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TCXT CDiTDR 



This program makes text composition and editing on the TRS-80 a 
breeze. It features a non-destructible cursor, versatile editing options, 
graphics capability, and Interfaces with cassette tape or either TRS-80 
printer. Commands Include: 



DELETE 


Deletes one or any number of spaces 


INSERT 


Inserts one of any number of characters into 




existing text 


ASCII CODE 


Allows Insertion of any character or graphic 




character Into the text 


REPEAT 


Allows any character to be printed repeatedly In 




the text 


PRINT 


Contents of screen will be copied onto TRS-80 line 




printer 


SAVE 


Contents of screen will be saved on the cassette 




tape 


LOAD 


Allows date on tape to be reloaded onto the screen 


CLEAR 


Clears the screen and moves cursor to starting 




position 


END 


Clears end-of-text of trailing blanks 



MICRO TEXT EDITER 



Available on Digital Cassette for Level II 4K or 16K — $9.95 

TRI-iO lof luicife iKchQACic 

17 Briar Cliff Drive 
Mllford, New Hampshire 03055 
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SoftSide magazine is continually seeking original articles and 
software for publication. Imagination and variety in concept and 
content are the rules at SoftSide — not the exceptions. Articles are 
purchased on a per-page basis, based on content and applicability. Our 
policies with respect to software purchase are highly individualized, 
and offer the programmer several options, including one-time 
publication rights, outright purchase, and royalties on sale of 
pre-recorded cassettes. For more information, please write: SoftSide, 
PO Box 68, Milford, NH 03055. 

For uniformity, we have adopted the Radio Shack TRS-80 Level II 
BASIC as the BASIC dialect used within the pages of this magazine. It 
was chosen because it stands to become the most commonly used 
dialect among microcomputer users and because it shares a common 
heritage with the many microcomputer languages produced by 
Microsoft. 
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monthly by SoftSide Publications, 17 
Briar Cliff Dr., Milford, NH 03055. 
Telephone: 603-673-5144. Subscrip- 
tion rates in U.S. and Canada are $15 
per year and $28 for two years. 
International rates are $22 per year 
and $38 for two years, remitted in 
U.S. funds. Please mail all sub- 
scription inquires to: SoftSide Sub- 
scriptions, PO Box 68, Milford, NH 
03055. Entire contents Copyright © \t, 
1978, SoftSide Publications, All 
Rights Reserved. ... oh, by 

the way ...serf's up! 
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The game of life. 

The word ''game'' conjures up a wide vari- 
ety of images from one person to another. Were 
you to ask ten different people what games 
mean to them, you shouldn't be surprised at re- 
ceiving ten different answers. According to 
Webster's, games are amusement or diversion, 
a scheme or project, even a profession, or line 
of work. The truth is that games of varying na- 
tures and purposes are so much a part of all of 
our lives, that in the broadest sense of the term, 
they are the very fabric of life itself. When we 
see children tossing rocks on a neatly chalked 
hopscotch court, we know that they're playing a 
game, but what are the men with notepads 
doing, as they hover around a two million dollar 
flight simulator ? You guessed it, they're play- 
ing the "game" for all it's worth. 

Some games allow us to put ourselves in sit- 
uations that would be impossible for us to ex- 
perience outside their own rigidly defined 
world. Businessmen have been wheeling and 
dealing in millions of dollars for decades, while 
others have sat and played Monopoly. Of 
course, games like Monopoly can only approx- 
imate those subjects which they represent. But 
considering the stakes, how many of us would 
be willing to play the "real game", using the 
"real gamepieces" — "real dollars" ? 
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Since the dawn of civilization man has sought a 
better explanation of the mysterious forces that seem 
to govern our lives. Learn the secrets of ancient 
Egypt. Benefit from the special knowledge once 
reserved for High Priests and Conquering Kings. Or 
better yet, if you don't believe in any of that, just 
bring it out the next time someone you know says, 
"Gee, it's a nice-looking computer. What does it 
do?" 

Available on prerecorded Audio Cassette for the 
Level I or II 16K TRS-80 Microcomputer — $9.95 

TRS-OO Sofluimc EKchcingc 

17 Briar Cliff Drive 
Milford, New Hampshire 03055 



With the advent of computers, and the soft- 
ware to run them, games are reaching new 
levels of sophistication. The businessman im- 
proves his game by using his computer to per- 
iform a ''Break-Even Analysis''. The hobbyist 
can use his computer to figure his tax return, 
take a peek into the future, or as in the case of 
this month's feature program Santa Paravia en 
Fiumaccio, to look into the past. 

Santa Paravia is an economic capsule simu- 
lation of life in a 15th century Italian city-state, 
and as with anything but the "real game", it 
can only be a shadow of that situation which it 
portrays. In feudal times, serfs and nobility, 
woolen mills, outrageous justice, and rats eat- 
ing grain reserves were more than just words on 
a computer screen, more than just a "game". 
For the inhabitants of Santa Paravia, it was the 
only game in town ■— the "game of life" — if 
you will. 

We hope you enjoy Santa Paravia, and we 
hope you gain some insight as to what life in 
those times might have been like. And, as 
you're playing, imagine a time maybe 100 years 
into the future, when advanced technology is 
capable of producing games so lifelike and so 
accurate in detail that they become increasingly 
difficult to distinguish from the real thing. 
What will they think of our "games" ? It's 
something to think about. 

Now, if you'll excuse me, I've got work to do. 





Reason's 
(greetings 



and Best Wishes for the New 
Year from everyone at : 



3ofE5ia« 




50 REH (HISTHfiS GRflPHIC 

180 CLS 

lie SET (55, 13) : SET<5fv 12) ; SET(57, 11) 

120 F0RX=58T064STEP2 

130 V=(78-X)/2 

148SETaV):SET«+LV) 

150 ffiXTX 

160 F0RX=66TO74 

170SET(X,6);fEm 

175 SET(74,7):SET(75,7) 

180 SET<76,7);SET(75,8):SET(76,8) 

1^ FORX=74TO77:F(KV=5TO10:SET(X,Y) 

200 NEXTV:NEXTX 

210 SET(70,7):SET(7L7):SET(69,8) 

2^Fa?X=68T072;SET(X,X-59) 

230 NEXTX 

240 F(KX=54T073:SET(X,14):SET(X.15) 

250 NEXTX:F0RV=16T019:SET(56,¥) 

255ST(71,Y):r£XTV 

260SET(58,17):SET(59,17) 

270 SET(68,17):SET(69,17):SET<e3,18) 

280 SET(64, 18) ; F0RX=53T074 ; SEKX, 26) 

2MHEXTX 

300 FORX=57TO?0:FORV=21TO25;SET(X,V) 

310 NEXTV:»CXTX 

320 F0RX=59T068 : SET(X, 26) : NEXTX 

330 Fa»{=61T066;SET(X,27):^TX 

340SET(63,28);SET(64,28) 

345 FORT=lTO10^:fEXTT 




350 SET(73, 22) ;SET<74 23) ;SET<75, 23) 
360 SET(?5, 22) :SET(76, 21) :SET(77, ^) 
370 SET(77, L^) :SET(77, 18) :SET(78, 17) 
375SET(7ai7) 

38« F0RX=79T(®7:SET(X,16):r£XTX 
390SET(98,17);SET(99.18) 
395SET<99,19):SET(98,20) 
m F(«X=97T079STEP-1 

410SET(X,21):fEXTX:SET(?8,22) 

420 SET(77, 23) ; SET(76, 23) : SET(?5, 23) 

425 F«»2=424T043KTEP3 

430 RESET(63,21):RESET(64,21):ISSET(62,21) 

440 RESET(65, 21) :PRINTi2, m". 

450 Fa?T=lTO180;NEXTT 

460 SET (65, 21) ;SET(62, 21) :SET(64, 21) 

470 SET(63, 21) : FORT=1TO70:NEXTT 

480 EXT2 

490 FORT=lTO^:rEXTT; 

PRlNTi424, " "; 
500 FORT=lT(600:NEXn:(»TO425 
1^ imiT"(W";fi:LPRINT" 'Mmm 




SPECIAL THANKS 
to Santa's designer: 
^FREDERICK CRANE 
''" Iowa City, Iowa 



Md: 



Slanto ''^'^raula 




^ Rev. George Bluik 
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A PARAVIA AND FIUMAO 

dO is a game for one to six players 
where the object is to build your tiny 
Italian state into a kingdom. Scoring 
is accomplished by promotion to 
higher titles of nobility: Sir, Baron, 
Count, Marquis, Duke, Grand Duke, 
Prince, and King for men, with 
corresponding titles for women. If 
anyone becomes a king or queen, the 
game is over, and they win. However, 
life for many was often fleeting in the 
Fifteenth Century, so death can end 
even the most promising career. U all 
players die before anyone becomes 
king or queen, the first player to 
reach the highest rank obtained wins. 
If only one person plays, the attempt 
is to be crowned before death. 



1. 



ITiere are four levels of dUBcalty: 
Apprentice, Journeyman, Matter,] 
and Grand Master. The only dif*{ 
ference is that the titles are more 
difficult to earn. Since life expectancy 
is the same (20 to 25 years after 
beginning to rule), the advanced 
games are definitely harder. 

Players altemate turns, with eadi 
full turn representing one year of! 
play. Each turn consists of four! 
phases: 1. Harvest Phase 2. Tail 
Phase 3. Mi^ Phase and 4. PUMc { 
Works Phase. 

HAK¥ESTPHASB I 

lata may eat from one to fifty I 
percent of your grain reserves daring! 
the winter. j^j^ 



HELP WANTED: Progressive-thinking Italian city-state 
looking for strong leadership. Must have the cunning of 
a Niachtaveili, instincts of a Borgia, and endurance of 
AttilatheHun. We guarantee to turn ability into 
nobility. Apply across from Town Hall. 
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Weather ranges from drought to 
excellent, and each field in pro- 
duction produces from one half to 
four and one half steres of grain per 
hectare, depending on the weather. 
To put 10 hectares of land into 
production requires two serfs (not 
including any working in the woolen 
mills) and five steres of grain. 

The Grain Steward reports the 

Harvest for the year, the grain 

^ Demand (the minimum amount to 

^ feed your people without some 

Ju starvation) and the market-price of 

grain and land, which varies with the 

weather, the ratio of the Harvest .to 

the Demand, and at random. At this 

time you may bay gndn, sell gndn, 

buy hud, or aell hmd. You can buy 



and sell to make your state grow and, 
meet its needs, or you may speculate: 
buying when prices are low and 
selling when prices are high. For 
tunes have been made (and lost I) by 
speculating. After you have made 
your deals, type to continue. 
How much grain wfD yon 
for ooBSBttptiea? the computer wilL 
ask. You must release at least 201 
percent of your reserves, and youl 
may not release more than 80| 
percent. If you release more than the 
Demand, most of the time your 
population will grow , more or less in 
proportion to the surplus. If you 
release less, you will have a high 
death rate as many of your serfs 
suffer from malnutrition. Only th 




serfs are announced, but food dis- 
tribution affects all classes of the 
society, and the growth of your 
economy as well. Substantial grain 
surpluses (35 percent or more) lead to 
in-migration as serfs come to serve 
you instead of more parsimonious 
lords. 

At the end of the Harvest Phase, 
the computer calculates the changes 
in your population during the year, 
calculates your rents (at 75 Florins 
per market) and profits (at a 
fluctuating rate per mill), and pays 
your soldiers (3 Florins per year 
each). The computer also checks to 
see if you have enough soldiers to 
defend your land. If you have at least 
one soldier per 500 hectares, you are 
safe. If you have less than one soldier 
per 1000 hectares, you will be 
invaded. If you have between one 
soldier per 500 hectares and one 
soldier per 1000 hectarees, you are 
safe unless one of the other players 
has about 2 and a half times as many 
soldiers as you have. An invasion is a 
real disaster, so keep your defenses 
up! 

THETAXPHASE 

CUSTOMS DUTY, SALES TAX, 
and WEALTH (or income) TAX rates 
are set by you up to the maximum the 
computer will accept. The taxes are 
interrelated, and raising one may 
decrease the yield from the others, 
sometimes by more than the amount 
raised. The taxes are based on many 
different factors, and a good tax 
policy at one stage of the game may 
be a poor one a few moves later. Your 
tax rates also affect your economic 
growth. If taxes are too high, 
merchants will move away, trade will 
collapse, and people will find ways to 
avoid their taxes. At the same time, 
tax money is a prime source for 
income to build the economy through 
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public works projects. It is your job to 
find the right tax level. 

JUSTICE ranges from very fair 
(and that kind of justice costs money 
but is marvelous iPor the economy) to 
outrageous (the taking of bribes, or 
selling justice to the highest bidder). 
You decide how much justice you 
need. Sometimes taking bribes gen- 
erates much-needed income, espec- 
ially when there is a famine and you 
are broke. But if your instincts tend 
toward Attila the Hun, you will notice 
each year that some of your serfs pack 
up and run away. 

You may change your tax rates as 
often as you wish, experimenting to 
get the best yield. While the 
computer calculates the yield each 
time, it does not credit you with the 
money until the end of this phase. 

Borrowing money is possible on 
any purchase. Your credit is good, as 
the head of a state, and the computer 
will let you spend as much as you 
want. However, if there is a negative 
balance after taxes are collected, the 
computer (without informing you) 
charges you 50 percent interest. After 
that, if your balance owed is more 
than 10,000 Florins times the number 
of titles you have earned, you go 
bankrupt, and that is very bad ! 

MAP PHASE 

Next the computer draws a map of 
your kingdom-to-be. The size of the 
area enclosed by the Wall indicates 
the amount of land you have. At the 
upper left hand corner of the wall is a 
Castle, unless your defenses are 
woefully inadequate. You get a large 
castle if you have at least one soldier 
per 500 hectares, and a small tower if 
you have at least one soldier per 1000 
hectares. If you have just a bare wall, 
you are in trouble. 

The mysterious figure on the right 
hand side of your display is a horse 



pulling a plow, with a man walking 
behind. If the horse's head is 
touching the top wall, you have 
enough serfs to farm all your land. 
(Time to buy more land.) If the horse 
is below the wall, you need more 
serfs. (Try being more generous with 
the grain distribution.) You should 
have your land and serfs balanced for 
best production, unless you are 
speculating in land, in which case you 
want unoccupied land for speculation. 

Your woolen mill is located in the 
lower right hand corner, if you have 
one, and it will grow as you add to it. 
At the next level up, only touching 
the left wall of your kingdom, you will 
fmd your markets, which also grow as 
you add to them. Directly above your 
markets is the site for your palace, 
which grows in five increments. If you 
start to build a palace before giving 
enough thought to the amount of land 
it takes to support a palatial lifestyle, 
it may grow right through your wall. 
Above and to the right of your palace 
is the site for your cathedral, built in 
six increments. Any money spent on 
your palace and cathedral after the 
first five or six installments is still just 
as useful; altarpieces and thrones 
cost money, too ! The money equips 
the inside, and makes your economy 
and your population grow just as fast. 

During the Map phase, check your 
defenses by examining your fort, 
check your agriculture by the position 
of the ploughman, and keep your 
investments balanced for faster pro- 
motions. You might become a Baron 
on the strength of markets alone, but 
you won't go much further. 

PUBLIC WORKS PHASE 

You have six options during the 
public works phase. You may com- 
pare your statistics with everyone 
else, if you have a mind for figures. 
People with a mind for figures 



sometimes do pretty good as rulers ! 
You may purchase weapons and 
armor to equip twenty of your husky 
young serfs as soldiers. You iray 
build a market and lure more 
merchants and more trade to your 
state. You may build a woolen mill 
and put one hundred of your serfs to 
work earning you hard cash instead of 
food for rats. This is an excellent 
approach to an unemployment prob- 
lem if your population growns faster 
than you buy land. If you are really 
flush, and ready to move up in the 
world, you may start (or continue) to 
build a palace or even a cathedral. 
At the end of the Public Works 
phase, the computer calculates your 
new title, if you have earned one. To 
do this, the computer gives you one 
point for eaclTOuilding, for each five 
nobles, ten clergy, fifty soldiers, fifty 
merchants, two thousand serfs, five 
thousand Florins, six thousand hec- 
tares of land, or each of the economic 
points that work behind the scenes to 
build your economy. The computer 
divides the sum by six to ten, 
depending on the skill level of the 
game, and subtracts from one to four 
points for your justice level. This 
calculation determines your title, and 
if you have earned a new one, the 
computer changes it. 

OBITUARY 

Right after you give your name to 
the computer, the year of your death 
is selected in a random calculation. 
Each year the computer checks to see 
if '*the fullness of time" has arrived. 
If it has, the computer will print an 
obituary, stating the cause of your 
death, and then display your state 
map. After that, the computer will no 
longer allow your turn, although it 
will keep a record of the final 
statistics of your reign in the 
comparison table. It is very possible 
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lANTED 

For EVASION of Subscription 

and WANTON NEGLECT 

of Home Computers 

It's a crime the way some 
people treat their computers. 
Or, should we say don't treat 
their computers. Imagine, 
there are still some TRS-80 
users who are depriving their 
computers - and themselves - 
by not subscribing to the 
leading magazine for the 
TRS-80. It's not that these 
people are withholding In- 
tentionally, it's just that they 
don't know any better, and 
that's our fault. 

REWARD 

In an effort to bring these; 
unfortunate souls into the i 
light of reason, SoftSide is 
offering a reward of $1 .00 
towards the purchase of any 
software in the TRS-80 Soft- 
ware Exchange Market i 
Basket Catalog for each \ 
TRS-80 owner's name that 
you submit to our sheriff for \ 
justice. 
So, inform on a friend today. 

He'll love you for It, and 
you'll get a software discount 
as well as help to build a 
bigger and better SoftSide. 



Contact: 
i The Sheriff's Office 
PO Box 68 

Miiford, NH 03055 
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Santa Paravia continued 

that another player could live several 
years longer and not do as well. It is 
not age, but highest title reached, 
which determines the winner. In the 
event of a tie, the first person to reach 
the title wins. This gives a slight 
advantage to the first player, but 
subsequent players make up for it by 
being able to cover the most 
successful person's strategy. 

STRATEGY 

Economic development is vital in 
the early part of the game. A 
combination of outrageous justice and 
high customs duties generates cash 
fast. Some of this money should be 
channeled into markets or mills to 
provide cash income and trigger 
economic growth. Markets do more 
for the economy, mills bring in more 

Continued, page 13 



TRS-80 

PROGRAMMING 

fflNT 



If you are using a disk system and 
have the double letter probleni, be 
especially careful listing a program. 
If the L is doubled, you will have 
LOST which will cause the computer 
to lock up. The only way to save your 
program will be to connect a line 
printer — most inconvenient if you 
have to go down to the local Radio 
Shack, order one and wait several 
months. Of course, you could simply 
turn the computer off and on and 
lose your program. 
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Santa Paravia continued 

income. But the most vital part of 
early game strategy is buying land. 
Since land prices are based on the 
ratio of your grain harvest to your 
grain demand, overpopulation raises 
the price of land, and that slows your 
growth. In addition, if you have 
surplus land when a famine hits, and 
the price of land skyrockets, you may 
be able to make a financial killing. 
But don't sell too much, or the price 
will never be reasonable. Land prices 
are high when crops are good, but 
also when grain is scarce. Average 
weather is more likely than either 
famine or outstanding crops; the 
weather is closer to a standard 
distribution than to random chance. 

End game strategy calls for di- 
versification. Since no factor can 
contribute more than ten points to the 
title routine, you should examine your 
statistics during the public works 
phase and determine the easiest 
points to get that will still be useful. 
In the last couple of turns, sudden 
high prices for land may make it 
worthwhile to sell a lot of land and 
buy items that contribute points. That 
may be enough to give you the crown! 

Line list begins page 14 



TRS-80 HOTLINE 

If you ever find yourself in need of 
some fast answers, an easy solution, 
or just a sympathetic ear, call 
SoftSide's TRS-80 Hotline. 
From 7:00 to 8:00 on Tuesday nights, 
our resident software editor will be 
"on line" to offer BASIC program- 
ming assistance to TRS-80 Level I 
and II users in need of a fix. 

HOTLINE 603673-5144 D 



ANSWER TO LAST 

MONTH'S PUZZLE: 

"BAD CODE" 

The probiem with last month's BAD 
CODE was that line 520 gave a FOR 
without NEXT error. Probably, your next 
step was to reverse the NEXT Y in line 
500 with NEXT X in 520. Nice try, but no, 
that didn't fix it either. 

Here's the problem. It's okay to leave 
a FOR-NEXT loop before it's completed, 
as I did in line 400. But there is a catch. 
Any time you restart a FOR-NEXT loop, 
you also kill any loops that were running 
inside it. 

Tfie first Y-!oop in line 320 has an 
X-Toop inside it at lines 340 to 380. This 
X-loop always finishes. If line 400 jumps 
to line 440, then the computer thinks that 
we have another X-loop inside the Y-loop. 
Now comes line 460, which reset the 
Y-ioop which never completed. It also 
reaets any loops previously running 
within Y. since it thinks the X-loop at 440 
is inside the old Y-loop, the X-loop at 440 
gets killed. So, now the computer thinks 
the only thing running is a new Y-loop. 

So far, everybody's happy. The 
computer starts looping away through 
line 500, humming and singing. When 
the Y-loop finishes, it drops to line 520 
and CRUNCH. What X-loop ? It says, we 
killed that when you started your new 
Y-loop in line 460. 

If you'd like to fix this little program, 
delete line 400. Now change line 320 to 
read: FOR Y=0 TO N. The program 
will now run correctly. 



STILL NOT A SUBSCRIBER ? 

Check page 51 and see what's 

in store for next month ! 

Send in your subscription so 
you won't miss a single issue! 
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Santa Paravia continued 



MATRIX VARIABLES 

A-Markets B-Palaces C-Cathedrals D- Woolen Mills 

G-Customs Tax Rate H- Sales Tax Rate I- Wealth Tax Rate 

J-Justice Level K-Treasury L-Land M-Merchants N-Nobles 

0-Year of Death P-Soldiers Q-Clergy R-Grain Reserves S-Serfs 

T-Title U-Economic Value V-Sex T!-Title N$-Name and City 

In each of the above, the number in parenthesis is the number of the 
player. U(0) is the skill level for the game, and Y(0) is the current year. 

NON-MATRIX VARL4BLES 

A,B-FOR Loops, Set and Reset X,Y,Z,X%,Z% -Temporary Use 

J-Income from Justice I!-Income from Wealth Tax 

C!-Income from Customs S- Income from Sales Tax R-Rat Damage 

W,W$- Weather H!-Harvest D!-Grain Demand L- Price of Land 

G-Price of Grain F-Number of Players 



ROUTINE: INITLiUZE 

LINES: 10-160 

PURPOSE: Allot String Space, Define Integer Variables, Initialize 

Year. 

le 'SfMTB PflRWIfi AM) FlUnCCIO VERSION 6. 2 

28 ' COraiGHT 1978 JiEV. GEORGE BLP L£ECi«li& PR 156% 

38 ' ttTOBER 16 

leeoEflRTse 

15BDEFIHT(»-J,fHlLV,H 
16eV(8)=14e8 



ROUTINE: 

LINES: 

PURPOSE: 



PROCESS: 



INPUT 

200-580 

Assign titles and cities to each player, and allot 

population and resources. Set number of players, skill 

level and provide instructions if necessary. 

Lines 320 and 330 initialize a FOR loop with the number 

of people playing, then lines 330-430 input data. Line 

310 sets the data pointer to the first city, and T$(A) is 

used temporarily to read each city to be combined with 

the player's name.Then the FOR loop in lines 440-500 

assigns T$(A) the appropriate initial title for each sex. 
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with line 450 setting the data pointer to the beginning 
of the data each time. Here you could save a few bytes 
by using the subroutine at 7170 at the price of a little 
confusion. Then simple input statements ask about 
instructions and skill level. 

m DBTfl 'SIR ■."BflROH •,'COUHT "^TIIRfiUIS '."DIKE "^'GRflD DUKE ', "PRINCE ", 

■♦RRRKIHG" 
m DflTfi "LflDV '.'BfKOESS ",'CaiMIESS •,'lllRffllISE "/OUOESS '. 'BRfl® DUCHESS ', 

•PRINCESS ■,"*IIRK QUEEN' 
228 DRTR "SJWrft PflRfiVIfl'. 'FlWfiCCIO', 'TORRICElifl", "NOLMEnO', 'FONTflHILE', 'ROMHGNR' 
293 ' SET UP NRTRICES 

366 aS:FRIHT:PRINT'SttiTR PffiAVIfl flO FIUNRCCIO' 
316 FRINT:FOR Mim: REflD fl$:ieCT 
328 IIWT'HOH HfWV PEOPIE HftNT TO PLflV (i TO 6)'iF 
336 FOR fW TO FiREflD Tl(fl) 
346 PRINT:PRINr"ll« IS TJC RULER OF "iTtCft); ' 

3S6 iimmfi) 

368 NKR)=N$(fl)+' OF "+T$(fi) 

376 PRINT'IS "iN»(fi)i ' fl HfW DR fl HOHflN'i 

388 V(R}=6:IirUT R» 

398 IF LEFTf(fl»,l)=T V(fl)=8 

486 6(ft)=25:K(fl>=18:I(R)=5:J(fi)=2:0(R)=i426«ID(35) 

418K(R)48e8:L(R}M66e8:R(fl):€ee8:T(R)=l:U(R)=i 

428 N(fl)=4:P(fl)=25:Q(R)=5:H(fl)=25:S(R)=28ee 

436IEXT 

446 FOR 8=1 TO F 

4S8 RESTORE 

468 B=V(R)+T(fl) 

478 F0RC4T0B 

488 REfl)Tt<R} 

498 ere 

Se8IEXTR 

516 INPUT'DO VOU HISK INSTRUCTIOHS"ifl» 

528 IF LEFT$(fl$,l)='N" THEN 548 

538 GisuB leeeo 

548 nWl APPRENTICE I JOURNEVHRN 3. NRSTER 4. GRttD HRSTER' 

558 IlfUT'ENTER LEVa OF PLflV DESie"; U(8) 

568 IF U(8)a U(8)=l 

578 IF U(8))4 U(8)=4 

588 U<8)=U(8)+5 Continued, page 18 
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RQBQT! 



m 



dip 

lr.L> 
IE* 






=01 



Sir 

\i 

Sin 
IF 



Chase games have been a favorite among computer 
hobbyists ever since they first started showing up on 
time-sharing BASIC machines. Now, you can piay at 
home! 

in this version, you'ii struggle to tceep your wits about 
you as an army of robots staik you through a seemingly 
endless maze with mechanical precision. It's you against 
them as you seek to avoid, and at the same time, trick 
them into their own trap. 

For the TRS-80 Level II 4K or 16K 
Microcomputer on Digital Cassette - $4.95. 

THl-WJ AOTIUKIfC CKCIKIIigC 

17 Briar Cliff Drive 
Mllford, NH 03055 



Ir.tJ 

res 



^Jl 

Iru 

sin 

ini! 

Ski 



)11i£?iJiklPI^Pi!!iL^II?iliPl£pcWI^^^ 




Round and round it goes ... 



Where it stops, not 
even the computer knows, 
in this simulation of a 
circus-type wheel of fortune. 
Includes barker, complete 
with a set of wise remarks — 
fun for the whole f amOy ! 



Available on Digital Cassette for Level II 4K — $4.95 

TRI-aO lof luiQic CNchoaet 

17 Briar Cliff Drive 
Milford, New Hampshire 03055 
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This is a program designed to serve the small businessman with few 
employees. The process begins with the entering of last week's receipts. First, 
load the tape file. A complete chart of all 42 expenses areas will be on display 
as you enter your checking 
activity. After entering, you 
are given a review of your 
entries and permitted to 
change any incorrect data. 
The activity is then posted to 
the respective account areas. 
Reports for the year to date, 
year to last week, and this 
week are now available for 
your review. One of the 
special features of this pro- 
gram is that it gives the user 
the ability to customize 
account areas. If all or some 
of the areas specified do not 
suit your business, or if other 
accounts would be more 
useful to your particular business, the user can alter a few of the data 
statements, re-record and everything will function as before. The process ends 
by transferring the newly-created data file to cassette for use next week. 
The program runs in Level I or II 16K, or Level I 4K. Sorry, but there just was 
not enough room in the Level II 4K to house the information. If you are using 
Level I 4K, do not post more than 30 checks per batch. Written to run in 
parallel with the nationally known Dome Bookkeeping System, the journal is 
available when ordering this program for an additional $7.00. 




Available on Digital Cassette — $15.00 [$22.00 with Journal] 

TRS-80 lofflujcife CKch<ific|c 

17 Briar Cliff Drive 
Milford, New Hampshire 03055 
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Santa Paravia continued 



ROUTINE: 


CONTROL 


LINES: 


600-990 


PURPOSE: 


Cycle each player in turn through the different game 




phases, increment the year, test for death of players, or 




death of all players. 


PROCESS: 


A series of subroutine calls with tests for living players. 




last player, and death or current player. 


599 ' COMIROL ROUTBE 


686 E=EH 




618 IF T(E)=-1 E=E+i 


619 ' TEST FOR END (F GffE fFTER DER1H 


628 IF(T{l)<l)(M>(T(2)a)fll)(T(3)<i)(»l>(T(4)a)«l)<T(5)a)»l)(T(6)a) TfDI fiOTO 11888 


638 IF E)F TIEN E4:V(e)=V(8)+l:G(}T0 688 


648 IF y(8))0(E) DEN 688 


645 IF V<8)=0(E) TJEN 1188 


658 GOSUe 2888 




668 mSIIR 2688 




678 GOSUB 4888 




688 GOSUB 3888 




698 GOSUB 5888 




788 GOSUB 6888 




718 GOSUB 7888 




998 GOTO 688 




ROUTINE: 


COMPARISON 


LINES: 


1000-1060 


PURPOSE: 


Displays comparative table of resources upon the death 




of a player, at the end of the game, and upon request 




during the purchase phase. 


PROCESS: 


A FOR loop cycles through the players, displaying 




variables. Data is formatted with tab statements. 


399 ' COfPflRISON ROUTIfE 


1088 OS 




1818 PRINT-NdfilF^SOlDIEiSaiRGViERCHRNTS SERFS \M IKfiSlJRV" 


1828 PRINT :FOR fWTfiF:PRINT T$(ft);N*(fl) 


1938 PRINT N(fi)j TflB(?) P(fl)i TflB(16) Q(fl)i TfiB(23) H(R)i TflB(32) S(fl)i TfiB<48) L(fl); 


TflB(58) K(fl) 




1848 lEXT 




1859 PRINT: ItfW" 


(PRESS EKIER)'i» 


1069 RETURN 
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ROUTINE: 

LINES: 
PURPOSE: 



PROCESS: 



OBITUARY 

1100-1290 

Ends one players participation in the game, printing a 

map of the state and a comparison table, as well as 

assigning a cause of death. 

Cause of death is assigned at random, with different 

probabilities for different causes; pneumonia is most 

common 



1099 ' OBITUKV 

liee CLS:FRINT:PRINT'VERV SfV ICHS' .FfilKT 

me PRINT T»(E)iN»(E)i ' HRS JUST DIED' 

1129 T(EM:V=*IIX8) 

1138 IF V(8»14Se FfilNT'OF OLD AGE IFTER R LONG REIGN* iGOTO 1196 

1148 IF V<4 PRINT'OF nEUHNIfl AFTER R COLD WINTER IN R DHFTV CRSTLf 

USB IF V=S FRINT'IN R SNUPOX EPIDEHIC 

1168 IF V=4 PRINT'ir TVFHOID fFTER DRINQNG CaJtiHINRTED HRTER' 

U78 IF V=6 PRINT'fFTER BEING RHRCe BV RfSBERS WILE TRflVELING' 

1188 IF U PRirOF FOOD POISONING' 

1198 PRINT 

1288 IffUT'(PR£SS ENIER)'jR» 

1218 805116 5688 

1228 GQSUB 1888 

1298 GOTO 668 



ROUTINE: MINOR 

LINES: 1300-1510 

PURPOSE: Integer variables, serf population changes 

PROCESS: 6 one-line subroutines. It is not good practice to put an 

INT command after an IF statement on the same line to 
test for anumber greater than 32767, for the computer 
will try to compute the INT( ) first and give an OV error. 
The population routine is called from different places 
due to grain surpluses or shortages. 

1299 ' HINOR SUBROUTIIES 

1368 I!=INT(I!):RETURN 

1318C!=INT(C!):l!ETl)RN 

1328S!=INT(S!):RETU» 

1338K(E>=INT(K(E)):iiETURN 

1568 Z=RII)(fl)*S(E)/'16e:S=Z:PRINT a'SRFS BORN THIS VEflR';S(E)=S(E)+2:RET«» 

1516 Z=«l)(fl)*S(EV168:2=Z:PRINT ZZ; 'SERFS DIE THIS VEfR':S(E)=S(E)-Z!:RETllRN 
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ROUTINE: AGRICULTURE 

LINES: 2000-2290 

PURPOSE: Set weather conditions, crop yield, rat damage, 

harvest, current reserves, demand for grain, price of 
grain and price of land for current player only. 

PROCESS: Calculations are part random, partially based on 

population and partially based on the ration of current 
harvest to current demand. The limiting factors in the 
grain harvest are: the amount of grain left for seed, the 
amount of land, and the number of serfs not engaged in 
the wool industry who can farm the land. 

1399 ' RGRICaTURflL CaCOflTIOiS 

2868 H=(i9IK5}4RID{6))/2 

2818 01 H GOTO 282a 2848, 2868,2888, 2188 

2828 U»='imi6HT FHUIE THRERTENS* 

2638 &0T0 2118 

2848 l»='BH) iEflTtER POOR IVIRVEST' 

2BSe GOTO 2116 

2068 W="NORHil ItBTIO flVERflGE HflRVEST" 

2878 GOTO 2116 

2888 H»=-G0(1D lERTIER FIIE HRRVEST' 

2898 GOTO 2118 

2108 W="EXCELL£KT ItflTlCR GREftT HRRVEST" 

2189 'RRTS ERT GRAIN 
2110 R=RND(S0) 

2120 R(E)=(R(E)*100^{(E)«R)/le8 

2125 'GRRIH HflRVEST 

2138 X=L(E) :V=(S(E)-D(E)*ie8)*5: IF n M 

2140 IF Va TJO X=V 

2i5eM(E)«2:IFV<XTICNX=V 

2166V=«-.5:H!=X*V:R(E)=R(E)+H! 

2169 'GRRIN DEWH) 

2176 D!=H(E)*100«;(E)*40Hf(E)*30H>(E)*10+S(E)*5 

2179 'PRICE OF LflH) 

2188 L=(3*IWM)(6)+RND(6)+16)/10 

2190 IF Hia V=2:G0T0 2218 
228eV=0!/K!:IFV>2V=2 
22ieiFV<.8V=.8 

2228 L=L*V:L=INT(L*16):L=L/16 

2229 'PRICE OF GRRIN 
2230Z=6-H 
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2248 G=(Z*3+RND(5)+RtI)(5))/5*V*28 


2298 fe»l 




ROUTINE: 


STEWARD 


LINES: 


2300-2390 


PURPOSE: 


Print summary of Grain and Market conditions 


2299 ' DISPUV HFRVBT (ALTERHflTE EHTRV - 2348) 


2386 PRINT 




■ 2318 PRINT'RfiTS filE' 


;Ri'2 0FV0l)RGRRINREERVES" 


2328 PRINT Wi'Ci^ 


li'STtRES)' 


2348 PRINT:IFK(E)<32?66(i(EUB 1338 


2358 PRINT'GRftIN 


GRfilN PRICE OF PRICE OF TREfiSURV" 


2368 PRINT-RESERVE 


OEUnD GfiRIN UN)' 


2378 PRINT R(E);TfiB(13) D!;TflB{24) GiTfE(36) bTflB(48) K(E> 


2388 PRINT'STERES 


STERES 1888 ST. ItCTflRE GOLDaORINS" 


2398 RETURN 




ROUTINE: 


JUSTICE 


LINES: 


2400-2475 


PURPOSE: 


Display level of justice selected by player and calculate 




court revenue. 


PROCESS: 


Revenue depends on level of justice and title. 


2399 'T»£S 




2488 J=(J(E)»38e-58e)*T(E) ;0N J(E) GOTO 2418, 2438, 2458, 2478 | 


2418 JI='VERV FAIR" 




2428 GOTO 2475 




2438 J$='K]|)tKHIE' 




2448 GOTO 2475 




2458 J*='H»iSH' 




2468 GOTO 2475 




2478 J$='OUTRflB0US' 




2475M5eHi(E)-«(EH(E):IFVaM 


ROUTINE: 


TAXES 


LINES: 


2480-2590 


PURPOSE: 


Calculate and display tax revenues 


PROCESS: 


Factors in tax yields include the economic factor, U(E), 




the different classes of population, the tax rate, and the 




rates on the other sources of state revenue. 
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2479 mCULflU TAX VIELD 

2«8 C!=(H(£)^8WI(E)*75HKD*2e)*(V/'iee)+U(£M8e 

2498 S!=(N(E)*5MKE)*25HJ(E)*ie)*(V/ieB)*(5-J(E))/2 

2588 I!:«(E)*25MJ(E)*2»Ki8*J(E)*N(E))*Wiee) 

2S18 C!€!*6(EVie8:IF C!G2768 GOSlfi 1316 

2528 S!=S!«H(E)/18e:IF S!G276e GOSUB 1328 

2538 I!=I!*I(EV18e:IF I!<32768 GOSUB 1388 

2548 PRM'STflTE REVENUES "; J+C!+Si+I !i 'GOLD aORINS" 

2542 PRINT'CUSTDK DUIY',"SflLES TflX'/INCOE TfK', 'JI5TICE' 

2546 PRIHI 6(E)i T.Mh T, I(E)i T.Ji 

2558 PRINT C!,S!, I IJi'FL" 

2S98ieJRN 

ROUTINE: HARVEST TIME 

LINES: 2600-2880 

PURPOSE: Buy and Sell Grain and Land 

PROCESS: Accept transactions, make changes in resources and 

treasury 

2599 ' HRNRGE HRRVEST 

2688 CLS:PRM;FfiINT T$(E)jN»<E) 

2618 GOSUB 2388 

2£28PfiINT 

2638 PRINT'IBW GRAIN ZSELL GRAIN IBUVLDH) 4.SELLLflf)' 

2648 IlfUT'(ENTER 8 TO CONTINUE)'; I ! 

2658 IF I !)4 THEN 2638 

2668 IF I la TIEN RETURN - 

2678 ON I! GOTO 2788, 2756< 2888,2858 

2788 ItFUT'HOH MUCH GRAIN DO VOU NfWT TO BUVM! 

2718 K(E)=K(E)-(I !«6^188e) :R(E)=R(E)+I i 

2728 CLS:PRINT:PRINT TI(E}iN$(E):GQSUB 2348 

2738 GOTO 2628 

2758 liFtfT-HON MICH GRAIN DO VDU HISH TO SELL'; I ! 

2768 IF I i>R(E) PRINT'VOU DOHT Vm IT" :PRINT;GOTO 2758 

2778 K(E)=K(E)+(I >.m.m) ;R<E)=R(E)-I ! 

2788 GOTO 2728 

2888 IIPlfT'HOH imv lECTARES DO VOU HRNT TO BUV'il! 

28i8L(EH(E)+I!:K(EM(EHIi«L) 

2828 GOTO 2728 

2858 liFUT'HOU HRNV KCTflRES DO VOU HRNT ID SELL'i I! 

2868 IF I !>(L(E)-588e) PRINT'VOU CANT SBi THAT HUCH'rGOTO 2856 
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2878UE)=L(EH!:K<EM(E)+(I!«L) 
2888 GOTO 272B 



ROUTINE: TAX CHANGE 

LINES: 3000-3190 

PURPOSE: Accept changes in tax and justice levels 

PROCESS: Accept new rates, go to TAXES routine for new yields. 

2999 ' DISPUW TffiB 

3eee aS:PfiINT:PKINT T$(E)iN$(E) 

3818 PRIHTiQOSlB 2488 

3828 FRINT:PRiri CUSTOMS DUTV 2 SflLES TfK I lEflDI W 4. JUSTICE' 

3838 urUT'CENIER TAX MCER FOR CHfNSES, 8 TO CONTItlE)'; I 

3848 IF IM PRINT:(»T0382e 

3898 IF I<i 80T0 3288 

3868 ON I GUro 3878, 3118. 3148, 3178 

3878 IIPUT1EH CUSTOHS DUTV (8 TO 188)'; I 

3888 IF Dm 1=188 

3898 IF 1<8 M 

3188 6(E)=I:G0T0 3888 

3118 IffUT'lEH SniS TfK (8 TO S8}M 

3128 IF(I)98) OR (I<8) 1=5 

3138 H(E}=I:l»TO 3888 

3148 nrUT'lEH lEflLTH TAX (8 TO 25)M 

315B IF(I<B) OR {I>25) TICN 1=8 

3168 I(E)=I:Q0irO 3888 

3178III>UT'JUSTICE:1VERVFRIR ZtflOEIiAlE IWRSK iOUIRRGOUSM 

^88 IFdM) OR (I<1) TIEN M 

3198 J(E)=I:GOTO : 



ROUTINE: REVENUE 

LINES: 3200-3220 

PURPOSE: Credit state with revenue at end of tax changes, test for 

money owed, assess interest, test for bankruptcy. 



3288 K(E)=K(EX!+Si+I!+J 

3289 ' INTEREST QlflRGE 
3218IFK(E)<8T)ENK(EM(E)*L5 
3219 ' BfVKRyPTCy TEST 

3228 IF K(EK(-ieee8*T(E)) fiOTD «i 



Continued, page 41 
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amv! 



All the excitement of the traditional Pinball machine — 
without the expense! You control the speed and direction of 
the ball as you try to ** Breakaway" the playing field. Easy to 
play? You bet! Easy to win? Better start practicing! 

Available on Digitaf Cassette for the TRS-80 Level II , 4K or 
16K Microcomputer - $4.95 

«^ TRI-60 lofluicifc CxchciAoe 

17 BRIAR CLIFF DRIVE MILFORD, NEW HAMPSHIRE 03055 



TRS-80 PROGRAMMING HINT 

Here's a question that was recently raised by a caller on our TRS-80 
Hotline: ^ 

Suppose you have just input the value of A and hit ENTER. And 
what happens ? CURSES#/&*%!? A line of display has just been 
wiped off the screen ! 

You've got a problem. The long and short of it is that you cannot 
control the cursor's passage to the next line once a reply has been 
received to its prompt for a keyboard input. Here's the solution: 

10 PRINT @ 65/'SELECTION?":X$ = INKEY$:IFX$= ""THEN GOTO 

This will work if your purpose is just to stop the program, and the 
input itself is not important. If the value of the input is important, 
you'll need the help of VAL as well; 

15X=VAL(X$) 

One last note: if an alphabetic input serves your need, line 15 is still 
unnecessary (when VAL is used and an alpha character is input, X will 
return a value of 0) . 
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FRANK B. ROWLETT, JR. 
300 APPERSON DR. BLACKSBURG, VA 24060 



The word ** bio rhythm'' comes 
from the Greek words, *Vbios'' 
meaning life and *Vrhythmos", a 
regular rhythm. According to the 
biorhythms theory, which first began 
in the latter part of the 19th Century 
and was refined near the middle of 
the 20th Century, there are three life 
rhythms that start at birth and 
continue regularly through life. 

The three rhythms are: the 
Physical rhythm, which is 23 days 
(ability to do physical labor, vitality, 
resistance to disease, etc.), the 



Emotional rh5d:hm, which is 28 days 
(sensitivity, creativity, the "blues", 
etc.), and the Intellectual rhythm, 
which is 33 days (absorption of new 
knowledge, memory, new ideas, 
etc.). The first half of the cycle of 
each rhythm is the high point where 
energy is expended effectively. The 
last half of the cycle of each rhythm is 
the low point where energy is 
restored. A person in the last half of a 
cycle of a particular rhythm is less 
effective in that area. 

Biorhythms contuiued, page 27 



16 CLS:PRIIfTMS,«BHlRlftTO!S PLOTTINB FROGRfiH"; :PRINT:PRH(T:aEflR28B 

28 REH BV FRfflK B. ROHin, JH (4-21-78) 

48 I«WI«fil»:PRlNT:IlfUT*\«lR BORN-;F 

68 IlfUT'HOMTH BORN (J»I=L FEB=i,..DEC=12)";B:aWI"DflV OF HONTH BORH"iC 

78 ffilNTilNPUT'raiR CHflRT TO BE IN';E:IFE<=FPRIHT"(NO 1ST OR HINDS VEflRS)':G0T07e 

75 HfUT'HOHIH VOU HfWr CHflRT FOR (JflN=L FEB=2....DEC=12)";J 

88 X=f :tf=B:l)€:SISllB138B:L=D:X=E:l1=JM:G0SIJBl^ 

83 IFF+10EFORX=F+lTOE-l:GOSUB118e:NEm 

85 0=2»(D-INT(D/2)*23) :R=2*(I>-INT(D/28)«^) :H=2*(D-INT(D/33)»23) 

38 K=31:IF(J=4)+(J=6H(J=9)+(J=11>K=38 

95 IFJ=2K=28:X=E:D=e:G0SUBil88:lFD=36fl(=29 

118 (i0SUB2888:G0SUB368:F0RG=lT0M-l 

08 T=<):IH6:G(G!B5e8:P=H:0=O+l:IF0>4fl)=l 

158 T=R:lJ=56:G0SUB5ffi:S=N:R=RH;ire>56R=l 

178 T=H:U=66:G0SUB5e8.i=N;B=H+l:IFH)66H=l 

188V=1:IFP=STI€HV=3 

198 lFP=IT[€NV=V+4 

2eePRINT§P.RIGHT$(STR$(V);l)i 

248 IFV)lTffli388 

258V=2:IFS=ITHENV=6 

268PRIHT§SiRIGHT»(STRJ(V)4)i 
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288 IFS=IG0T0328 

298PRIHT§LT.;:(iOT032e 

388 lFPOI60T029e 

3ieiFPOSPRINTSS,'2"i 

328 IE(IG;V=782;2=318:H=8;F0R!{=125T0il3STEP-4;IFH=lG0T0348 

338 IFP0IHI()t43)MI«=l;PRlNT» "i :F()i5=6T044:SET(X,S):ttXTS:PRiNTIV. "-"; iPRINTiZ, "+"; 

348 M-2;Z=Z-2:NEm 

345 PRINT8%3, '(1 FOR lEN CHRRT FCfi SRHE PERSOtl 8 FOR m PERSON)'; 

358 I»VIX.IFX=8G0T018 

355 05:801078 

368 REST(SE:F(]R»a=lTai;i!£flDC$.l£XT 

378 DATRJflMflRy. FEBRURRV, tIRRCH, ifRlL tIRV, Jll£ JULV, RUGUST. SEPTQfiER, OCTOBER, 

NOVEICER, DECEMBER 
498 B$=C$+STRf(E)+" FOR •+»:LZ=M((64-lJEN(BI))/^):IFLZ<8TlfiC:=8 
495PRINT«17wB»j:RET11RN 
588 REN * PLOT FOIHTS « 
518 K=T*(36MJ)*. 8174533 
528 N=SIN(K) 
538 IFN(8n€MNi-.85 
548IFK)8T)EW=Nt.e5 
588 K=-fi4*INT(5««):IFI08K=«-64 
598 M4Gt448:RETllRN 
1188 REH * DffiS IN R VEflR * 
me IFX/4-INT(X/4)08TffiD=IH^:RETIIRN 
1128 IF(!(/18e-M(}t'188)=8)*W489-INTW4ee)08)Tfei>=lH365:RETURN 
1138 NH366:RETiJRN 
1388 REN * ORVS aXE fW IFT * 

1318 V=l>t38*(H) : IFH>1TI£NV=V+1: IFH>2MHM-2: IFH>3MNM+l;IFH>5ieV=V+l 
1328 IFN>7H€HM+l:IFH>8THENMtl:ini>18raW=V+l 
1338 H:G0Sieiiee:IF(D=3e6)*(H>2)TiENy^l 
1348 N>-y:RE1Uai 
2888 REN* SET SCRON* 
2828 aS:Q=K-INT(K/18)*18:IFQ(8Q=6»18 

2823 PRINTK4,"l=PHVSICa, 2=EN0TIflHfL 4=INTELl£CTUH. (3,5,6 1 7='; 

2824 FfilNT'JUCTIONS)'; 

2838 M;FOR!{=858T0858»K+QSTEP2:IF»869V=2:IF»889V=3 
2848 FRINTfJtV; :NEm:V=8:F0RX=«6T0S95t2«ISTEP2:M»i:IFM8V=8 
2858 PRINT8X,ft :«m:FORX=lT04«K+lSIEP4:FORV=6T044:SET(X,V):ieaV:(Em 
2868 F0RX=8T04«K+2:SET(X, 6) :SETa 22) :SET(X, 38) ilKTX 
2878 FRINT§256, '*'i :PRINT8648, •-: :RETURN 



26 



Biorhythms continued 

There are days called * 'critical" 
days where a rhythm goes from the 
first half to the second half of the 
cycle or from the second half to the 
first half of the cycle. On critical days 
a person is likely to have problems 
caused by poor judgement or co- 
ordination. Because the three 
rhythms are not equal in length, there 
are times when double and triple 
critical days occur. 

In the 1950's, a sine-curve rep- 
resentation was developed for plot- 
ting biorhythms. The height of the 
curve has no bearing on the rhythm 
except to give a visual representation 
of the cycle. What counts is which 
side of the X-axis the curve is on 
(above or below) and when it crosses 
the X-axis (critical day). 

There are proponents and op- 
ponents of the biorhythm theory, but 
the arguments on either side will not 
be presented here. There is one thing 
that should be mentioned: the 
biorhythms theory is not a "fortune- 
telling" gimmick. It simply tells when 
a person may be liable to self-induced 
problems or highs and lows. It cannot 
and does not indicate 'Mucky" or 
"unlucky" days. 

The "Biorhythms Charting Pro- 
gram" for the Radio Shack TRS-80 
Microcomputer System will plot the 
three rhythms (physical, emotional 
and intellectual) for a specified month 
in any year after the year of birth. The 
representations of the three rhythms 
are the classic sine-curve repre- 
sentations around a center X-axis 
dividing the chart into a plus (-h) part 
on the top and a minus (-) part on the 
bottom. 

Each of the three curves is drawn 
using numerical digits to indicate 
which curve is which; the physical 
curve is represented by Ts, the 



emotional curve by 2's, and the 
intellectual curve by 4's. Where two 
or more curves intersect, the numeric 
values of the curves are summed. For 
example, where a physical and an 
emotional curve intersect a 3 (1 plus 
2) is used, where an emotional curve 
and an intellectual curve intersect a 6 
(2 plus 4) is used, and where all three 
curves intersect a 7 (1 plus 2 plus 4) is 
used. 

Critical days are where a curve 
crosses the X-axis. This is rep- 
resented by breaking the X-axis and 
printing the value of the curve 
crossing it (or sums of the curves in 
the case of double or triple critical 
days). 

The information a person is 
required to give the program is: first 
and last name; the year, month and 
day of the month he was born; and 
the year and month for which he 
wants his biorhythms charted. The 
computer will prompt for this in- 
formation as it is required. 



TICTACTOE 

X X 
X X 

Everyone knows this game, but 
how about a 4 x 4 x 4 version ? 

This program offers three skill 
levels for computer competition, 
and the author warns you to 
practice before you take on the 
computer's third skill level. You 
can also play your easy-to-beat 
friend, of course. For Level I and 
ll,16K — $7.95 

TRS-80 Software Exchange 

17 Briar Cliff Drive 

Milford, New Hampshire 03055 
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THAT'S RIGHT! NOW, 
YOU CAN TURN YOUR 
TRS-80 INTO A C^SH 
REGISTER WITH MANY 
FEATURES FOUND ONLY 
ON MACHINES COSTING 
THOUSANDS! 




« Twelve Departments that You Can Customize ! 

• Stores up to 300 Sale Events by Department and 

Amount! 

• Total Daily Sales Report! 

• Cash-out Routine ! 

• Can even be used with Screen Printer to furnish 

Receipts ! 

• Best of all, it runs on either Level I or n, 4K or 16K 

TRS-80 Microcomputers ! 
If you've been considering adding the convenience and versatility 
of a small computer to your business, for use in Inventory 
Management, Business Accounting, or any of hundreds of other 
useful applications, here's one more reason to do it today. At this 
price, you'll never fmd a better buy. 

Available on Prerecorded Digital Cassett for the Level I or II, 4K 
or 16K TRS-80 Microcomputer - $9.95 

TRI-60 lof liuofc iKchcmoe 

17 BRIAR CLIFF DRIVE MILFOHD, NEW HAMPSHIRE 03055 
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ALCULAT 





b}^ Russell Starkey 

Considering 
anew 

purchase ?... 






like maybe disk drives, 
or say, a line printer? This 
loan schedule program can save you some time when it 
comes to shopping for the loan. Just fill in the infor- 
mation asked for (interest rate, term of loan, etc.) 
and the computer will display a complete schedule of 
payments, showing the interest and principal portions of 
each payment, the accumulated interest and principal 
at each payment, and the remaining balance. 



148 CLEflRK:E€FINT X . ¥ iDEFSTR S 

Si="«l,HH.tt":IHfiSC12) 

168 PRItfTSH , ' 

moRTiSD um samLt 
Dispuh? fl corffiTTE samn of 

PfMEHTS Smm Tffi IMTEiaST 

m mmpfL portions of ehch 

PRVJCNT, Tf£ (KCIHULRTEP 
INTEREST m> PRINCIPflL ftT EflCH 
PRVKNT, ttD M REmiKIHG 
Bafl«C£° 



CLS :PRINTCHR*(23> : 



I pi-ogram is in. 

^.^ Uvet H 



29 



m PRINT :PRlHT"PRCGRfiH BV RISSEUL STflRKEV";PRIKT" 

855EIE0««€R':PRINT' JfiSPER IN 4754S" 

m FOR X= 1 TO 3880:101 
i^ F^IMTS648, ;F1!MCHR*<31):PRI«T:PRI[ff"PR£SS ENTER TO COfTINUE 

MtPUTSS 
3W 

NOTE fiRE fl ! ! : i 1 ! ! 
PV = PRESEHT VfiLUE PHT = PERIODIC PfffflEHT 

I = iNTDOT / vtffl? ifi = ( I / tee ) / N 

V =N0. OFVEflRS Vti = FLffi i= 8¥ V. 2= fiV H 

328 ' 

N = NO. OF PERI80S / VEflR 

IP = INTEREST J flHT, /PERIOD 

IT = IWTEREST TOTAL * RHT. 

PP = PRIKCIPflL S flKT. / PERIOO 

PT = PftlNCIPflL TOTflL * fUT. 

DE = DELfllV FOR OUTPUT DISPLRV 

528 CIS : PRINT:FRIKT 

538 INPUT'flMMUT TO BE ERROe "iPV 

535 IF PV<1 Tl»t53e 

548 INPlfT"!HTEREST / VEff? M 

545 IF I M90 Ttt«54e 

558 IHP(n"NUHBeR OF PERIODS / VERR "iH 

555 lFN<nTOS558 

568 irniT'NUMBER VtflRS TO REFW THE LOflM "iV 

565 iFV<l OR V>ie08 THEN 568 

578 INPUT'EMreR DISPLfiV DELflV IH SEC. M)E 

575 Ji2=J{2+l:ir X2=l THEH IF DD15 PRIMT'flRE VOU SURE VOU NEED ft M)& " 
SEC. DELfiV? ":Q0T0 579 

57? IF DDCe PRIHT"T00 LONG DELfiV MjOTOSTB 

578 IF 0£<8 DE=8 

688 IR=(i/HVie8 : Pm=PV*lfi/(l-atlft)t-(N*V)) 

638 IFH=1 VN=i ; G0T0678 

648 PRINT'OITPUT DISPlflV BV VEfR OR BV' PERIOO ? ? ? ?" 

650 IHPUT'ENTER i FOR StflR 2 FOR PERIOO — "iW 

660 IF WOl m ¥N<>2 TWN 648 

665 FOR X = 1 TO 12 : REfiD S4 : S(X>=S4 :HE5a 

666WITftJflH ,FEB , HflRCH* APRIL HfiV ,Jlie ^JULV .AUG 

.SEPT ,(x;t ,m ,m 
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678 CLS :PRIHTCH»t22) : PRINT ; PRIKT iFUINT : 1NPUT"E»TER STflRTIMB 
VEflR •jRV;CLS:reiMI{«»(23);IF RV09 RV=RV*13fle 

768 ' 

KftTH COHEPOIHT . 

718 IF W4 MM RV^Wti ; PP=8 : IP=8 ; FOR X =1 TO N : IK=Ift»(PVH»T) : 
IT=IT+IK : PK=PMT-IK : PT=PT+PK : IP=IP*IK : PP=PP*P1C ilOtT 

m IF VfN^THffl R«=RIW:lRW=W+i fM=l : fiy=RV+i 

738 fiP=RP+l :IF VH=2 THEN IP=IR*(PV-PT> i IT=ITtIP : 
PP=fHT-IP : PT=fT+PP 

1969 S2=IfKEVt:IF S20"Tt»l DE=V«.tS2> 

2088 ' 

PRINT DfiTfl CO«E POINT //////// 

aeSIF VN=lPRI»fT818,RV;' Bfldft M!P 

2128 IF Vtt=2 M) H=12 PRIKTee ,RV;' MTR *iS{fai)j 
;PRIHTK& R«:PRIWT848.RPi "TOT'i 

2148 IF yi^2f«DN012PRIffTM.RV>-Df(Tfln]R PERIOD t';RN;* MPj 
2168 IF RP>2 nOI 2278 

2288 PRIHTei28, "flffT. BORR(»ED '; :PftIKIU5IHG Sii PV 

2228 PRIKT^ISZ, MHTERESr /VEflR -~ M; " T 
2248 PRIBTK56, "HUWER Of yB«S ~ "iV 

22ee pRiKreze. "P(mcht % :prihtusiw sl pht 

2278 PRI»T8384, : PRMCrfi((^) 

2388 PRI«Tf512, "INTEREST •; :PR1N1USIMQ Sli IP 

2308 PRIIffe576. "INTEREST TOTH. — ': :PR1HTUS1HG 51i IT 

2320 PRINTe$4a 'PRIHCIPd '; :PRINTUSING SliPP 

2348 PRINT87W,"PRINCIPfl!. TOTAL — "; ;PRINTUSIHG SliPT 
2368 PRINT?768, "PRIHCIPflL LEFT — "; :PRIim(SIHS Si;PV-PT 
2588 FOR X = lT0CC*5e6 : rE)a : IF VN=2 TlfN 2788 
2€ee PRINT; IF RP»V END EISE 80T0 788 
2788 PRIffT: IF RP=V*K EM) aSE GOTO 788 



Although it is our intention to publish programs in line listing form for 
our readers' transcription, we realize (hat the actual keyboarding may 
require more time than some are able to devote. 

To better serve our readers, prerecorded digital cassettes of this 
program are being made available for substantially reduced rates from 
The TRS-80 Software Exchange. 

If the "prerecorded" route is best for you. simply use the order form in 
the TRS-80 Software Exchange Market Basket Catalog section of this 
magazine. 
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WikVrii'lTRATinNl 



-^3 ^ 

JUST LIKE '^ 
THE POPULAR 
TV GAME 
SHOW! 






, 


EflCWflS 




>» J <« 


>» ?<« 


>» 3«( 


>» 4(t^ 1 


>» 5«( 


>» *,<« 


■ >» ?<« 


>» ^«( 


>» 9(« 


>» 18 <« 


») U <« 


>» It: <<( 


»> 13 f« 


>»H(« 


>»15«^ 


>» It (« ! 


PtSJfYLflHP 


TftiP >» ]8 «( 


>» is (« 


)» 2fl <i{ 


>» ?l <« 


>» cS <« 


)» 23 «{ 


)» ?-! <« 


)^> K <« 


»> £6 <« 


y» £? <« 


>» ?f: «^ 


■ ^» ^ <« 


^» 38 «< 


>» 2\ <« 


>» 3£ (« 


FM?. M BI 


^}CYliV{D TRIPi lOHH 1 7^ 


■^^ 


flTEI - EHTEft YOUR StCOHD Wi^ _ 





Select a square 

and reveal one 

half of a 

fabulous prize ! 

Find the other half and it's yours (well, not really). 

Stereos, televisions, Disneyland trips, they're all on the 

big screen — there's even a TRS-80 ! 

But don't forget the basic rules, concentrate on what's 

on the board, or you'll end up helping your opponent 

more than yourself! 






Available on Digital Cassette for 
the Level I or 111 6K Microcomputer — $7.95. 



TRi-60 lof lufcifc exchange 

17 Briar Cliff Drive 
Milford, New Hampshire 03055 



SPELLING 
BEE 



by Lance Michlus 
WINOOSKI, VERMONT 



This program gives the early speller a fighting 
chance, in that it shows the correctly-spelled word 
then asl<s the user to type it out on the keyboard. 
Since it chooses the words to be spelled randomly, 
the order in whicli the words are presented will 
never be the same from session to session. You 
may want to periodically update the program by 
changing the words {in the DATA statements) to 
reflect your pupil's increased ability. 



28 'SPELLING BEE BV LffflCE HICKLUS 

m ' 

m CLEAR 50 

80 ^mm ; OEFINT fl-Z 

100 ' 

SET ms EQUflL TO THE NUMBER OF HORDS IM THE DflTfi STATEMENTS 

i2S HKJS=27 

140 0I« W*<l«DS-i) 

160 as 

m PRINT ti9t$<22) 

2&i PRINTK20, "HELLO. " : INPUT*l#fflT'S TOUR Nfll1E"iNfl» 

220 PRINTK20/'HI ";fStt;"!!!" 

240 reiNT'TLL SHOW WU fi WM. THEN" 

260 PRINT'VOU TRV m SPELL IT. • 

288 PRINT 

208 PRIMT'flRE VOLS? REflOV ";HWi : INPUT fl* 

3^ IF LEFT$(fl*.l)=''N" EM& 

240 RESTORE 

260 FOR H=0 TO HRDS-1 




388 REfV) H$(N> 
480 NEXT 
420FaGUESS=l TOie 

440 as 

460 PRIMTCH»(22) 

488 tt*HCKl«DS-l> 

506 PRIHTe328, "yORD"; GUESS; " IS "j ltt<H)i ". - 

520 FOR TIME=e TO 4^;rCXT 

548 as 

560 PRIhfrCHft*(21) 

580 PRIMTK20,*"; 

688 INPUT'«HftT'S Tl€ WORD"; fit 

628 IF f»=H$(N) PRIMT"THfiT'S RIGHT "il«Wi"f!!":GOTO 768 

648MH<I4+1 

66BPRINr''S0RRV •;Nft*i". " 

688 PRINT"THE HORD IS "iW$<N>i". ■ 

788 PRINT 

728 PRINT'PR£5S "ENTER" TO CONTINUE. " 

748 IF IM(EV$="" THEN 748 ELSE 800 

768 FOR TIME=8 TO 4008;fCXT 

788 0KW+1 

888 NEXT GUESS 

828 CLS:PRINTCt«$(23) 

848 PRINTP328, "CORRECT; "; CH, "HRONG; "; W 

868 PRINT:INPUT"PLRV fiGftlN'iftt 

888 CH=8:HH»e 

908 GOTO 320 

1808 ' 

WORD LIST IS BELOW IN THE FORH OF MTfl STftTEMENTS 

1628 ma SONG, LflHP, BEND, DENT, DUST, DflNCE, HflP, MflTCIi HflSL FENCE 

1048 DfiTfl FLING. FUN,PflCK. PATCH/ PflH,HlLT,WIM,HHIP,SKILL SICK 

1060 DfiTfl SILK, CAMP, CfiTCH, CAN, BfWi HATCH; WITH 



Although it is our intention to publish programs in line listing form for 
our readers' transcription, we realize that the actual keyboarding may 
require more time than some are able to devote. 

To better serve our readers, prerecorded digital cassettes of this 
program are being made available for substantially reduced rates from 
Tlie TSS-80 Software Exchange. 

If the "prerecorded" route is best for you, simply use the order form in 
the TRS-80 Software Exchange Market Basket Catalog section of this 
magazine^ ^ 
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ttiNUMSEH 



Ko, it's not a game^ but it can make renumbering your 
programs seem like child^s play! 

If you find yourself renumbering your BASIC programs 
to provide room for additional lines, or just to make 
things neater, this 13K program has got to make your 
life easier — it can renumber a 12K program like 
Treasure Hunt in just 32 seconds! 

■ ■■■■IHIHIBIH 

The user has complete control over which lines are re- 
numbered and how — including all GOTO's and 
GOSUB's. You can even renumber the middle of your 
program and leave the beginning and ending alone. If 
an undefined line is found, the program will display both 
the line which caused the error, and the unfoundline 
number, thereby making corrections much easier. 

■ IHIHIBinrHIMIMIHIH 

You may have seen other renumbering programs, but 
none with this many features. No external tables are 
used. RENUMBER runs in 1300 bytes of high memory, 
regardless of program size, and loads with the SYSTEM 
command. Versions are available for 4, 16, 32 and 48K 
machines. Be sure to specify memory size desired, or 
16K version will automatically be supplied. Compatible 
with Disk BASIC. 

■ ■■IHIHIHIHIHIHIHIBIHIHIH 

Available on Digital Cassette for the Level II 

TRS-80 Microcomputer - $15.00 , 

TRS-OO SofluicifC CxcficiAfc 

17 Briar Cliff Dr, Milford, NH 03055 

■ IHIHIHIMIHIHIVIBIHIHIMIHIHIH 
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X-wiNG Fighter 



The Death Star Space Station, u rider the command of Darth Vader, is the most 

powerful weapon the universe has ever known- A frontal attack by any other 

craft would be absolute suicide. However, intelligence delivered to Republic 

headquarters by the androids R2D2 and C3P0 gives a faint hope of a 

successful attack by a small ] - or 2 -passenger X-wing fighter. 

There is a small unshielded exhaust port on the surface of the Death Star that 

leads directly to the main reactor. Since it is an emergency thermal port in case 

the reactor overheats, it could 

not be shielded. If you can slip 

vour small fighter past the 

Teath Star's defenses and 

make a direct hit on the 

thermal exhaust port with a 

torpedo, there is a chance the 

torpedo will penetrate the 

main reactor and start a chain 

reaction, destroying the Death 

Star, it is a slim chance t but it 

is the only one the Repubhc 

has. Obi-Wan Kenobi gave his 

life to get the message here; 

so he consitiered it very 

important. 



The X-wjng fighter is a small 
1- or 2-passenger rocket that 
is. quite frankly, obsolete. It is 
armed only with a laser cannon 
and 3 torpedoes. Use the laser 
cannon to fight off any 
imperial fighters, and save the 
torpedoes for the Death Star. 




£^ ABB tf VOUR KE^OflRD COWTliaS VOJK SWJP, fC FOU.QMS" 
L £ 3 4 5 6 r e 9" 
SHE R T V t' I r 

vUFr} (.mmi'^ aoftPEM' crighi)* 

ft ; D F G H J k L. ,■ 

Z X i: V B N M . 



The target acquisition radar can detect targets in excess of 100^000 km away, 
but can only display targets within 20^000 km. Therefore » you will be warned of 
approaching targets on the right side of your control panel before they are 
disp/ayed in the radar screen. 



Available on Digital Cassette for Level 1116 K — $7^95 

TRS-OO Sofluiom iKchofiQc 

17 Briar Cliff Drive IViilford, New Hampshire 03055 
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51X iSiLLiOni 

DOLLAR [/!□ K ] 
CLOCK 

ii^ ■■■■i^ ■ I By Peter Ashley 

As written, Eh is program wil) rim in either Level 1 or IL provided that 
Level I users change the @ sign to read AT. However, since the machine's 
internal function time is a factor in its accuracy as a clock, a few changes 
are required for Level 1 users. Most notable is: 

200 FOR N=0 TO 374; NEXTN 

Also, in line 120, you will find the fine tune loop. Those who want Co 
increase the accuracy of the time piece can increase or decrease the number 
of FOR NEXT revolutions to optimize its time-keeping accuracy. Actually, 
additional levels of accuracy can be achieved by building similar FOR NEXT 
loops in lines 140 and 160. 

This program was sent to us as an aid lo Amatuer Radio enthusiasts. It 
will keep track of local time, Greenwich Mean Time, elapsed time* as well 
as flash "^^ Station Identification'' prompts at the proper intervals. 

While the program functions very well as a *'Ham Clock'', we felt that 
some of you might be able to think of some other uses as well, so here it is. 

10 fl=0:B=i8:C=0:H=0:I=e:J=e:K^:l=0:H=e:V^l 

12 CLS:fRHITB4a 'l*^ MHO tim? 

12 mm?m. Tffi^ INSTRUCTI^M PRESS 1 ELSE S-. :IfPUTQ 

14 m^mmi&m 

15 CLS:FRINM52. ''PRESS Et€ER TO SET aOCK". Amim 

20 as 

39 PI?lKT@i2Si "llifiT IS THE HOUR IH l^L TIHE (0 TO 23). "^ 

35 imriF m t^ 12 to the hour (e< 4fti = m ".h^printprint 

:;7 1FH;^23K)T039 

46 INPUT"I«T RRE THE MINOITES IN LOCfiL TIi€ MFI^INT.PRIKT 

56 Ifftn^iMT m THE SEOM^ IH LOCft, TIH£ ".C.PRmT:f1?INT 

Sa REH ** LIf£ S m\£lS TIMING TO mC&M m GRmiCS 

65 CLS.C=CH;L=2 

?e le ** LIHES 74 M> 75 D*^ THE ID m ** 

74 F0R;<=22T0S3:SETCX.22>:SET(J<.28):NEKTX 
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75 SET(22, 23) :SET(22. 2?) .5ET(32, 2S> :Se<93, 27) 

^ pRif(TW4. "** Loca rm **' 

35 PRINTS18S. "*♦ G. fl. TIt€ **" 

36 PRIffT#398. •COlftiT-DGHK -TO STffTIOW ID TIME'i 

98 PRIHTe844 "TOTAL RCam.fiT£D TIHE: " 

99 REH ** LIt€S m TO 496 SET aOCK ** 
m RKS=CTO£0 

i^ IFS>53H=l^l.C=0:fGRZ=lTO28:t£KT2:fiOTOiee 

149 irH>5SHiti:H=0:C=8:GOTOie0 

1^ IFH>23H=8:t1=0:e=9:GOTOl^ 

1© fi=Fl-i 

178 IFfK9THEW=B-i:ft=59 

172 IF(B<l)*(ft<3e)PRIHT?529. "ID HfllVLE I&V 

174 m ** ID SIGN FLfgHES FOR ^8 SECOHCS PER LINE 175 ** 

175 IF(e=9)*<fl=«)^et B=i6 
180 L=L+1 

182 ia>5»;=KH:L=8 

184 IFK>53J=J+l:K=e 

19ePRIfiTe86&J,":M0':"jL 

2W FO(?N=0TO199:fE)!TH 

205 RBI ** 219 mi 224 CfiatfiTE & ft TIffi « 

219 G4H5 

229 IFH>i8G=H-i9 

3e0PRIKTei91Hi";"i[1i";";S 

3iePfiIHT8237.(j;";"ilt";*.S 

m mmmti. " "^ e^ " hinutes •; fii " seconds "; . 

406 HEXTS 

1809 aS.mtfT.PRINT 

1919 PRIKT"HKILE OBSERVING SOS TIfC STflMDflRD SUCH flS WJV OR 

1020 PRINT'VOUR WATCH ENTER TJ£ HOUR AND rilHUTES »£N THE 

1930 PR INT "COMPUTER RSKS. ALL TIIIES ARE ENTERED USING TIC 24 

1640 PRINT"HOtiR aOCK SVSTEK DO HOT ENTER HOURS USING DflVLKSfT 

1945 PRM-SfWIHCS Tift \PRIKT 

1850 PRM-'ENTER SECONDS IN RDVanCE OF THEIR flCTUfiL OCCURRDCE 

I960 FRIKT^THIS flLLOKS ¥0U TO PRESS THE ENTER KEV RT THE SflHE 

1078 PRIffT"SECOND flS '.OUR TIHE STfiNDflRO. " 

19^ PRINT"TtE CtmJTER RDJUSTS m ITS m mSH. ' 

1985 FRlMT;FRIflT'FfiESS ENTER TO TU?N TNE RflGE", : WUTfi* 

1990 CLS;PRIHT, PRINT 

11^ flflNT'THE 'ID CfW(T-DOHN' SLm IN THE CENTER OF WE SCREEN 
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1128 PRINT'HILL FLfiSH WK CflLL LETTERS FOR 38 SECONDS EVERV 
1138 PRINT"10 MINUTES, REMINDING m TO IDENTIFV VOUR STATION. 




1148 PRINT 

1158 PRINT"PRINTED AT TfE BOTTOM OF VOUR SCKEN IS fl TflLV OF 

1168 PRINT'VOUR JWI-RfiDIO TIME. ":PRINT 

1170 PRINT'THE IPPER RIGHT CORNER SHOHS GREENWICH MEAN TIME. 

1180 PRINT : PRINT PRINT'PRESS ENTER TO BEGIN, "j :INPUTA*: RETURN 

2888 END 

CHESS CLOCK 

Here's a tournament chess clock program that you can use the next time 
you feel like getting into some serious playing. Each player is given two 
hours to win the game, or complete 40 moves. The program is written in 
Level II BASIC, but will run in Level I machines with the appropriate 
changes (note REM statements within listing). 

1900 CLS:V=7200: 2=7200 :T=0 

1950 INPUT"PRESS ENTER TO BEGIN THE GflME"iA$:CLS:6OSUB2080 

1970 H=2:I1=8:S=0:GOSUB2300:GOSUB2310 

1980 GOTO2100 

2000 PRINT§20, "TOURrffBCNT CHESS CLCCK":REM LEVEL I SET<127,47) 

2005 PRIMT087, "COMPLETE TURNS"; L 

2010 PRINTei30, "WHITE TIME REMAINING", "BLACK TIME REMAINING" 

2020 RETURN 

2100 REM HHITE TIMING AREA 

2110 V=V-1 

2115 FORI=1TO240:NEXTI:REM TO460 IF LEVEL I 

2116 REM FINE TUNE TIMING FOR WHITE ABOVE 
2120 H=INT(V/3600):M=INT((V-(H*3600))/60) 
2125 S=V-<H*3600>-(M*60) 
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2130 C$=INKEV$:IFC*=" "005162300 :GOTO2100 

2135 REM IF USING fl LEVa I MflCHINE REPLACE 2130 WITH 

2136 REM IFPOINT(127,47>GOSUB2300:6OTO2108 
2140 GOSUB2000:QOSUB2300 

2150 REM IF LEVa I SET(127,47> 
2200 REM BLACK TIMING flREfl 
2210 1=1-1 

2215 FORI=iTO240:NEXTI:REM TO460 IF LEVEL I 

2216 REM FINE TUNE TIMING ABOVE FOR BLACK 
2220 H=INT<Z/3600):M=INT«Z-(H*3600))/60) 
2225 S=Z-(H*3600)-(M*60) 

2230 C$=INKEV$:IFC$=''"GOSUB2310:GOTO2200 
2235 REM SEE NOTE LINE 2135 
2238 REM IF LEVEL I SET(127.47) HERE 
2240 T=T+1:GOSUB2000:6OSUB2310:GOTO2100 
2300 PRINT0197. H; " : "j Mi " : "; S; : RETW^N 
2310 PRINT0230, H; " : "; Mi " : "; Si : RETLRN 



TRS-80 
PROGRAMMING HINTS 
For Disk Users 

If you are using a disk system and there is no diskette loaded when you 
try to save a program, the computer will lockup, to save your program, 
load a diskette, then flip the switch on the back of the disk unit on and 
off. This should cause your program to be saved instead of returning to 
the DOS and dumping your program. 



If you are developing software on a disk system, protect yourself 
against a lockup or system crash by making frequent backups on two 
separate diskettes. Some errors will wipe out an entire diskette. Your 
frequent backups will then create another problem — which is the 
latest program ? The solution is to include the date and time in the title 
when you save the program. For example, SAVE''N01118CL" might 
stand for November 11, 1800 hours (6 pm) backup of the program 
whose title begins with CL. To determine which program is most 
recent, simply call DIR when the DOS is loaded and read the titles. 



40 



Santa Paravia continued 



ROUTINE: POPULATION 

UNES: 4000-4280,4500-4530 

PURPOSE: Make changes in population levels based on grain 

available for consumption 

PROCESS: Accepts grain released for consumption, at a minimum 

of 20 percent of reserves and a maximum of 80 percent 
of reserves. Serf population depends on grain supply 
with normal growth at lines 4110 and 4120, bonus for 
large surplus in 4200 to 4280, and penalties for 
shortages in lines 4500-4530. Other classes of 
population increase and decrease with tax levels and 
grain levels. All calculations are part random. 

3939 ' raniumoi 

4868 PRINT 

4ei8 Ilf>UT'H(lU IU» 6f«IN HILL VOU RBiRSE FK I»1SUFI(MV 

4828 IF G!<(R(E)/?) PRIKI'VOU MIST RELERSE AT LERST 282 OF VOK RESERVES' iQOTD 4818 

4838 IF G!>(R(EHR(E)/^)) PRINT'VOU HUST KEP ftT LEflST JSB^.mi 4818 

4835 R(E)=«(E)Hi!;aS:FRniT;FRIHT T$(E);NKE):PRII(T 

4848Z=G!/D!-1:1FZ)8Z=Z^ 

485BIFZ>.25Z=Z/18+.25 

4868 Z5!=58-G(E)-H(E)-I(E):IF ZZ<8 ZZ=Z5W(E) 

4878 22=22/18: IF SM ZJ!=Z3!+2-J(E) 

4888Z=Z+(Za'18):IFZ>.5Z=5 

4188 IF G!<(D!-1> IKH 4588 

4118 R=7:(iOSl6 1588 

4126 R=3:G0Slie 1516 

4138 IF (G(E)4H(E))<3S H(E)=H(E)4i9D(4) 

4146 IF I(E)<RM)(28) H(E)=«(E)+R»(2)-1:Q(E)=Q(E)+RIIX3H 

41SeiFG!<(D!+Di*.3)TICN43e6 

4288 Z2=S(E)/16e8 

4216 Z=(G!-D!)/T)i*16 

4228 Z=Z»ZZ*RND(25)+RND(46):IF Z>32868 Z=328ee 

4238 Z5;=Z:Z=«i)(Z2) 

4246 PRINT Zi "SERFS MM TO TfC CITV':S(E)=S(E)+Z 

4258 Z2=:Z/5:Z=IM)<ZZ);IF Z>5e Z=58 

4266 H(E)=«(E)+Z 

4278 N(E)=N(£)+1 

4286 Q(E)=Q(E)+2 
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4588 X=(DHi!)/T)i*iee-9:ffl=X:IF )065 X=65 
45K IF m ff.'^M 
4518 fl=3.G0Slie 1598 
4528 R=!K+8:G0S116 1518 
4S38 GOTO 4386 

ROUTINE: INJUSTICE 

UNES: 4300-4490 

PURPOSE: Penalty for harsh or outrageous justice 

PROCESS: Serfs flee in random numbers, based on justice level 

4299 'INJUSTICE PQIITY 

4388 IF J(E)G TICN 4496 

4318 J!=S(E)/'18e*(J(E)-2)»(J(E)-2) 

4326 J'.^mQl) 

4338 S(E)=S(E)-J! 

4348 PRINT J!i "SERFS FLEE HIiRSK JUSTICE' 

4498 GOTO 4988 

4499 ' FOOD SHDRTRGE 

ROUTINE: TREASURY 

LINES: 4900-4930 

PURPOSE: Pay soldiers, collect income from markets and mills. 

PROCESS: Call integer subroutine for serfs. 

4986 Z=(KE)*75;K(E)=K(E)+2.iF Z>e PRINT'VOUR HflRUT EflBED-iZ; "FLDRINS RENT" 

4916 IF S(E)<32?66 S!=S(E):GOSUB 1326i(E)=S! 

4928 Z=D(E)*{55«liM)(258)):IF Z)8 K(E)^(EHZ:FRINT'VajR HOOEN HILL EfKie'jZj'RORINS' 

4938 Z=P(E)*3:PIUHT'V0U PftID VOUR SOLDIERS'iZ;" FLORINS" :K(E)=«(EH 

ROUTINE: INVASION 

LINES: 4940-4990 

PURPOSE: Check for inadequate defenses or military imbalance, 

and call invasion of weakness indicated. 
PROCESS: Calculate ratio of soldiers to hectares of land 



4939 ' INVRSIQN 

4946 IF (L(E)/18e8))P(E) TiO 8188 
4945 IF (L(E)/^)<P(E) TICN 4988 
4958 FOR fMTOF:IF ft=E TffN 4976 
4968 IFP(R»<P(E>*Z4)THEN8188 
4976 (EXT 
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4988 IffUT'CFUSS ENTER)"; fl» 
4996 OKN 

ROUTINE: MAP 

LINESs 5000-5990 

PURPOSE: Display Resources in graphic form 

PROCESS: Calculate upper left corner of wall according to land 

owned and draw wall. Calculate ratio of soldiers to land 
and draw large castle, small tower, or no castle. Draw 
Cathedral in steps, using ON... GOTO... statement. 
Draw palace in steps, using a for loop and a completion 
test for the roof. Determine ration of serfs not in the 
wool industry to land owned and draw ploughman at 
point indicated by ratio, between top wall and bottom of 
screen. Draw markets and woolen mills in steps, using 
for loops. Print Year. 

4999 ' DRflH Hff 

seescLS 

5018 LZ=<L(EViee8):IF U:<18 X=88:V=27:&0T0 5186 

5828 IF 1208 X=88:V=27-(LZ-i8> :60T0 5188 

5838 IF U:<58 }!=68:y=27-(L5!-38) ;GOTO 5188 

5848 IF L5!<78 }(=48:V=27-(LJ:-58):G0T0 5186 

5858 IF U!<98 X=28:V=27-(U!-78):G(}T0 5186 

5868 IF i:i<118 X=i:V=27-(U!-98);G0TO 5188 

5878 X=1:V=7 

5186 FDR Z=Xr0127:SET(Z,V):er Z 

5118 FOR Z=VT047;SET<X,Z):IB!T Z 

5128 IF(P(E)-5)<(L(E)/'1888) TICN 5168 

5138 FOR ft=X+lT0!{+6:F0R B=VtlT0V+5:SET(a gVNEXT B:I£XI fl:SET(X,V-l):SET<X+2,M) 

:SET(XHV-l):SET(X+fcH) 
5148 IF (P(E)/2)«L(E)/188e) TKN 5168 

5158 FOR fl=X+7I0X+18:F(]R B=VtlT0y+5;SET(ftB):IBT B:ei fl:SET{X+&H).SET(X+lB,H) 
:RESET(X+1 Vt2) :RESET(X+7, VH) :SET(X+L V-1) :SET (X+9, H) ;SET(X, V-2) :IT(X+a V-2) 
:SET(X^V-2):SET(X+lftV-2) 

5168 Z=C(E>+1:IF Z>7 TOI 2=7 

5178 ON Z GOTO S258> 5248. 5238. 5226,5218. 5288, 5188 

5188 FOR H6TQU8:SET(fl,38):NEXT R:RESET(182,38):RESET(184,38) 

5288 FOR 8=96T099:F0R B=24T029:SET{fl,B):ICXT B:iEXT fl 

5218 FOR fH87rO118:F0R B=24T029:SET(fl,B):IEXT B:iEXT fl 

5228 FOR B=22T024:SET(183,B):IEXT 6:SETa82,23):SET(184,23} 

5238 FOR fM81 TO 185:F0R B=25 TO 2e:SET(fl, B) :tEXT BifEXT fl 
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S23SRESET(i8L25):l£SET<185,25) 

S248 FOR ft=ie0TOie6:F(lR B:27T023:SET(fl,B):IE!(r B:\EXi fl:iiESET<ie2,29):RESET(ie4>23) 

525B Z=B(E)*2:IF Z^ TICN 5386 

5255 IF Z>9 SET(73,32):SET(75,32):SET(89<32):SET(9L32):SET(74,31):SET(9e,31) 

5268 IF Z>8 Z=9:FI1R fi=88T084:F0R ft=38T032:SET<aB):IKT B:tEXT ft:RESET{8L32): 

RESET(8i 31) :SET(8L 29) :SET(83, 29) :SET(82, 28) 
5278 FOR R=(82-Z)T0(82+Z):F0R 5=33T035:SET(tlB):IE!iT B:«XT fi 
5288 FOR ft=(83-Z)T0(81+Z) STEP 2:RESET(fl34):«XT fl:RESET(82,35) 
5388 Z=S(E)-D(E)*i9e: IF Za THEN Z=l 
5385 Z=Z*M(E)*i8ti: IF Z>18 TICN Z=ie 
5318 Z=(Z/18)*(45-V):Z=INT(47-Z) 

5328 FOR fl=119T0127:SET(fl,Z):«)iT fl:RESET(122,Z):l!EET(123,Z):l!ESET(125,Z) 
5338 FOR fi=119T0127 STEP 2:SET(fl,Z+l):(E(T fl:SET(118,Z-l):SET(127,Z-l) 
5488 Z=fl(E)*2:IFZ=8Tl£N 5588 
5418 IF Z>((126-X)-2) Z=((126'X)-2) 

5428 FOR ft=XTflK+Z STEP 2:Sn(ft,39):SET((HL39):SET(ft+L48);SET(fttL41):«XT R 
5588 Z=D(E):IFZ=8 TBI 5988 
5518 IF Z>(126-!0 Z=126-X 

5528 FOR fl=126-ZT0127;FOR B=45T047:SET(llB):t€XT B:I€XT fi 
S539 FOR fH27-ZT0126 STEP 2:RESn(ft 46) :NEXT fl 
5988 FRINT8 644, 'VEflR'i 
5928 FRINR 7e7,V(8)j 
5938PRIM«8J«E)iN»(E)i" 
5948 IirUT'(ENIER i)',» 
5^ RETURN 

ROUTINE: INVEST 

LINES: 6000-6550 

PURPOSE: Purchase buildings, arm soldiers, call COMPARISON 

PROCESS: PrintOptions, input selection, ON.. GOTO.. Purchases 

increment item purchased, deduct cost from treasury, 
buildings increase economic factor. Markets increase 
merchants, palaces increase nobles, cathedrals in- 
crease clergy, soldiers decrease serfs. 

3999 ' IKVESnOfTS 

6888 aS:PRIflT:PRINT T$(E)il»(E):PRIHT'5TflTE PURCHRSES'iPRINT 
6818 FRIHT'l HHRKETFIiCE ISeeaORINS' 

6828 PRirZ HOOLEN HILL 2888 FLORINS' 

6638 PRINT'I fflJCE (PfKTIfl.) 3888 FLORINS' 

6648 FRINT'4. CRTtlDRfl. (PflRTIflL) 5e8& FLORINS' 



6858 FRINT'Si EWIP OE PLflTOON OF SERFS flS SOLDIERS 588 aORINS' 


6868 FRINTrPRM'VOU Hf«"iK(E)j'GOLD aORIN5":PRBIT 


> '6^ PRINT'TO CONTINUL ENTER 8, TO COITflRE STflOINGS. ENTER 6' 


6888»rUT-VDURCH0ICE'iI 


6896 OS: IF la RETURN 


6118 IF 1)5 GOSUB 1888:8(1106868 


611601 1 GOTO 6268,6128,em6m6588 


6128 D(E)=D(D*i 




6138K(EM<E)-2888 




fil4eU(D=U(E)+.25 




6158 GOTO 6866 




6288 fl(E)=fi(E)+l 




6218 H(E)=H(E)+5 




6228 K(E)=K(E)-18e8 




6238U(E)=U(E>+.1 


., 


6258 GOTO 6888 




6396 B(E)=e(E)+i 




6318 N(E)=N<E)+RS)(2 


) 


6328 K(EM(E)-38e8 




6338U(E)=U(E)+.5 




6358 0010 6666 




6486 C(E)=€(E)+1 




6416 Q(E)=Q(E>4flD(6. 


( 


6428 K(E)^(E)-5888 




6438 U(E)=U(E>+i 




6458 GOTO 6686 




6568 P(E)=P(E)+28 




6516 S(E)=S(E)-28 




6528 K(E)=K(E)-^ 




6556 GOTO 6888 




ROUTINE: 


TITLE 


LINES: 


7000-7540 


PURPOSE: 


Calculate new title 


PROCESS: 


Each of the significant criteria is examined in turn; 




markets, palaces, cathedrals, mills, treasury, land, 




merchants, nobles, soldiers, clergy, serfs, economic 




factor. Each of them is divided by a equalization factor 




relative to their importance, then in the subroutine at 




7500, their effect on any title is limited so that one 




factor does not dominate the whole game. The current 




factor is added to the scores for the previous ones. In 
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line 7130 the total is divided by the skill level, then the 
level of justice is subtracted to get the title deserved. 

Line 7190 tests for the winner of the game. 



6939 ' CflLCULfllE (EH TITLE 

7866 Z=8 

7816 fN)(E):GOSlie 7566 

7626 ft=6{E):G0SllB 7568 

7838 iN;(E}:GQ9]B 7988 

7648 M(E):GOSlie 7588 

7858 M(E)/?888:G0SUB 7568 

78E8 fH.<D/68ee:GQSU6 7586 

7878 fHKE)/58:80Slfi 7586 

7886 R=)i(E)/5:G0Sl]6 7568 

7896 fmE)/58:l»SUB 7568 

7188 R=Q<E>/18:fiOSIIB 7588 

7118 fl=S(E)/288e:G0SliB 7566 

7128 (HKE)/5:G0SIB 7568 

7138 fl=M8)-J(E):B=«IT«0:IF (M ft=8 

7148 IF (V(8)+2)=0(E) T<E)=T(E)+1 

7138 IF T(E)>=fl TKH 7496 

7168 T(E)=R 

7178 RESTORE 

7188 FOR H Vi (T(E)+V(E)):IB1D T«E).fECT 

7196 IF T(E)=8 TICN 7686 

7496RE1UIN 

758eiFfl>16M6 

7528 fl=IM[(fl) 

7536Z=Z+fl 

7546 RETURN 



ROUTINE: ROYAL 

LINES: 7600-7610 

PROCESS: Announces winner, prints display and comparison, 

calls END 



7599 ' KING OR eUEEH 

7688 aS:reiNT:FRINT"G«t OVER •iT$(E>iN$(E);' HINS' 

7616 G09IB S816:(»9ie 18e8:G0T0 11818 



ROUTINE: BANKRUPT 

LINES: 8000-8050 

PURPOSE: Penalizes player who borrows too much money 

PROCESS: All buildings are eliminated, all but 6000 hectares of 

land seized, treasury is set to 100 Florins 

7999 ' BBKRUPTCV 

eeee CLS:PRIHT:PRIHT T$(E);»(E); ■ IS BWKRUPT- 

8818 PRINTiPRIMT'CeiTORS mi SEIZED HUCH OF VOUR ASSETS" 

8828 PRINT 

8838IffUT"(PRESSEHTER)';f» 

8848fl(E)=e:B(E)=8:C(E)=8:D(E)=8:L(E)=6888;U(E)=i:K(E)=188 

88S8RETURN 



ROUTINE: INVASION 

LINES: 8100-8290 

PURPOSE: Penalty for inadequate defenses 

PROCESS: A stronglr player invades and seizes land if ratio of 

soldiers to land falls below 1 to 1000. An invasion is 
possible with a ratio of less than 1 to 500 if another 
player is particularly strong. If no other player is 
stronger, Barmi Peppone of Monterana invades. In 






addition to lanpTsst, some soldiers are killed in battle. 

8833 ' IHfflSION (FROH 4348) 

8198 Z=8:F0R MTOF 

8118 IF fKTOI 8288 

8128 IF P(fl)<P(E) THEN 8288 

8138 IF P(R)<(1 2*(L(fl)/i888)) TIO 8288 

8148IFP(fl))P(Z)2=fi- 

8288 NEXT \ 

8^ IF Z=8 Tl(8)=' mm ■;N$(e)="F£ff«£ (F «]NTER««":fl!=fM)(3888)+ieee:G0T0 822# 

ma R!^<2)*iffiH(Z)/3 

8228 IF fli>(L(E)-58e8) fi!=<L(£)-5ee8)/2 

8238 PRINT Tt(Z)iN$(Z)i" INVHB fW SEI2S";fii 

8248 FRINT'lECTflRES OF U»!" 

8258L(Z)=L(Z)+fl!:L(E)=L(E)-fl! 

8268 Z=RW)(48) : IF D(P(E)-15) Z=f (E)-i5 

8278 PRINT Wih NI(E)i " LOSES"; I ' SOLDIERS IN ERTTLE" 

8288 P(E)=P(E)-Z: IlfUT"(PRESS ENTER)'; R$ 

8238 RETURN 
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ROUTINE: INSTRUCTIONS 

LINES: 10000-10170 

PURPOSE: Give general idea of game to new player 

PROCESS: Material is condensed to fit on screen in one page. 

9999 'INSTRUCTIONS 

leeee as.PRiHT'SflNTfl pfiRfivifi m Fiumccio- 

18018 PRINT" VOU ARE THE RULER CF fi iSTH CENTURV ITflLIfW CITV-STfiTE " 
18828 PRINT'IF VW RULE ELL VttJ WLL REVIVE Hlfiffl? TITLES. TIE" 
18838 PRINT"FIRST FtflVER TO EECOflE fl KING OR fiUEEN HINS. LIFE EXPECTfWCV" 
18648 PRINT"TJtN HRS BRIEF, SO VOU HW NOT LIVE LONG ENOUGH TO M ' 
18656 PRINT" W. COffUTER HILL DfiftJ fl HRP OF VOUR STATE TIC SIZE" 
18668 PRIMT"OF TICflRERINTffiHfiLIGRflHSRSVOUEUVNORELffll). Tl£" 
19676 PRINT"SI2E OF T}£ GUARD TfllER IK TIC UPPER LER CORe SHOHS" 
18686 PRIHT'TIE ADEQUACY OF VOIR DEFENSES. IF IT SJRIIKS, EQUIP IfORE" 
18696 FRINT"SOLDIERS! IF THE HORSE AH) PLOWW IS TOUCHING THE TOP HALL, " 
18188 PRINT"ALL VttlR LAH) IS IN PRODOCTIOK OTeWSE VHJ ffED HORE" 
10118 PRINT-SERFS, Mi HILL HIGRATE TO VOW? STATE IF#OU DISTRIBUl" 
18126 F«INT"HORE GRAIN THAN Tff HINUHUH DEHflH). IF VGU DISTRIBUTE LESS" 
10136 PRIHT"GRflIN, SOTC OF VOUR PEOPLE HILL STAR^ AM) VOU HILL HAVE" 
16148 PRINT"A HIGH DEATH RATE HIGH imS RAISE NIEV, BUT SLOU DOW' 
181S8 PRINT'ECONGHIC GR»iTR (PRESS ENTERrTO BEGIN IM)"; 
16168 INPUT A» 
18176 CLS:RETURN 

ROUTINE: END 

10599 ■ tm 8ffl€ 

am asm ^m-MSB im 

11616 PRINT "Gflff IS lMR: PRESS ENTER FOR NEW 
11820 INFIIT m 
11828 GOTO 18 



Although it is our intention to publish programs in line listing 
form for our readers' transcription, we realize that the actual 
keyboarding may require more time than some are able to devote. 

To better serve our readers, prerecorded digital cassettes of 
this program are being made available for substantially reduced 
rates from The TRS-80 Software Exchange. 

If the "prerecorded" route is best for you, simply use the order 
form in the TRS-80 Software Exchange Market Basket section of 
this magazine. 
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Wmi Fiiuuimt 

by M. D. Kelleher 

Turn Your 
Computer Into 
A Personal 
Financial Advisor! 

If you Ve been waitmg for a personal 

finance program that's easy to use, 

yet complete enough to be of real use ^ ^ 

in your home, check out this 

list of features: 

•Cost of Borrowing 
•Balance of Loans Still Owing 
• Loan Payment Amount 
•Savings Growth Baiancd 
'Growth of Regular Savings Doposfts 
•Dividends and WIthdrawaU 
•Earned interest Hate on Savings and Investments 
•True Cost of an Automotjile 
•Probability of Obtaining a Loan 
•Establishment of a Household Budget 

Try doing all that on your household calculator .., 

or better yet, buy the program — it's cost-effective. 




Available on Digital Cassette for Level II 16K — $9.95 

TRf ^60 JoffluKiic EKChcifigc 

17 Briar Cliff Drive 
Milford, New Hampshire 03055 
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BASIC STATISTICS 

This powerful set of procedures is of use to students ^ instuctars, 
beliaviomt and research sdentists» statisticians — anyone using these 
statistical formulas for practical or research applications: 

^.>| RANK -ORDER DATA A simple program utilizing si:% 
-^y'.- Shell- Met zner sorting routine to rarik data in an ascending manner, ^\ 

i'^ CENTRAL TENDENCY Given a set of raw data, this program j^ 
H^: ranks and displays raw data (optional), N, X, X , variance, --'S 
f)i- standard deviation, the Median, and the Mean. -^y- 

f^ PEARSON PRODUCT-MOMENT CORRELATION COEFFICIENT i 

^'. \ Given N pair (X,Y) of data, the program computes mean, standard ^ ' 

^ deviation for S and Y, and R. An option is available to utilize a : _\ 

v;^ regression equation to predict Y given any value of X. '^' 

P'i CHI-SQUARE Given raw data for any number of rows and . % 
^/,i column J the program will optionally display a raw data printout with 
&^.N observed and expected values; row, coiumn, and grand totals; and ..^; 
^ +: gives the used CHI and DF. >^: 

■[ FISBEB. X'TEST Given 2 sets of raw data for either equal or :A; 

? unequal N, the program computes and displays N, mean, standard I^ 

'^ ) deviation and standard error of the mean for both data samples as 

^r. well as T and DF. 

^ ; SIMPLE ANALYSIS OF VARIANCE Given raw data for any 

^ ■= number of conditions, the program computes and displays N, Mean 

■ .■ and Standard Deviation for each condition as well as SSbg* SSwg, 
^ SStot, DFbg, DFwg, DFtot, MSbg, MSwg, and the F, 

' Z-SCORES AND STANDARD SCORES Given N scores, the '.;§ 
. program computes a Z-score for each N. The user has an avaiSable ']^% 
./.v option to compute a standard score for each N given the desired 
;:.y.. Population Mean and S.D, 

■;. RANDOM NUMBER GENERATOR Given the upper and lower 

■ i;< limits, this program produces a list of N random numbers useful in 
^; C research and experimental design. 

NOTE: The basic formulas for these major statistical procedures were 
derived from the textbook, * 'Elementary Statistics*', by Janet T. Spencer, 
Benton J, Underwood, Cari P. Duncan, and John W. Cotton. Appleton - 
Century - Crofts Psychology Series, New York, 1968, 

Available on Digital Audio Cassette for the Level TRS-80 
Mlcrocofnptiter - $20,00 

Tp£ TR5-80 lefluiQie CN€hoA9e 

' ITflfllARCLJFF DRIVE MiLFORDp NEW HAMPSHIRE 030SS 






In the next issue 



Ten Pin Bowling— superb graphics make this program 
enjoyable and educational 

Kiddy Siot~ali the spice without the vice 
Graphics Tutorial — because you asked for it 

'Round the Horn — a simulated passage from New 

England to San Francisco — if you're able 

Comput-A'Sketch— a TRS-80 drawing program for the 

whole family 

TRS-80 Programming Hints and much more ! 



Okay! 



Rush me the next 12 issues of SoftSide. Enclosed is 
my full payment of $1500. 

n check D Money Order 

DMasterCharge/VISA Telephone your charge order" Call 

our Subscription Department 9ani to 
Spm^ 603-673-5144 



VtSA 





■■ 1 • 1 T 

Account f 





Exp. Date 

Signature-. 

NAME 

ADDRESS — 
CITY, TOWN 
STATE 



. Interbank #(M/C only). 



.ZIP. 



12-78 
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by David Boliike 

Seconds count ... Somewhere 
deep inside a towering sky- 
scraper the time bomb is ticking 
away. Would you be able to 
locate and disarm this explosive 
device in time to save the 
t^uilding and its inhabitants? 
Vlaybe, hut for everyone's sake, 
you'd better get in a iittle 
practice with this computer 
ajmulation first ! 



^\o^' 



Tick I 



^'oj^f 




Available for Level I 4Kor 
Uevefni6K--$7,95 



TRI^fiO Soflufcirc EicehciftQC 

17 Briar Cliff Drive 
Milford, New Hampshire 03055 



3ott^id^ Subscriptions 

PC Box 68 
Mllford, NH 03055 
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MARKET BASKET 
CATALOG 



Till-so loftuiCiig iKchcinge 



PROGRAM DESCRtPTrONS 

RENUMBER -by Lance Micklus 

Can renumber a 12K program in just 32 scLonds. Complete tscr control 
whh respect to which lines are renujnbercd, and how, inuuding all 
GOSUB's ynd GOTO's. Runs in 1 JOO bytes of high meniorv regardless of 
program si/e. Spectty 4, 1<), 32. or 48K version. Compatible with Disk 
BASIC. For the Level 11 TRS-*JO Microcomputer. 

ACCOUNTS RECEIVABLE by M.D, Kelleber 

Allows for the ere a lion of up to 200 files with account name, invoice 
number* payment dale and balance. Updates files and stores to tape. Offers 
complete aging data and reveaK dernii|uenl accounts. Level U 16K 

BREAKAWAY-by Lance Micklus 

A challenging *'real time*' action game of skill and dexterity. All the 
excitement of the traditional Pinball machine-without the expense! You 
control the speed and direction of the ball as you try to ** Breakaway" the 
playing field. Easy to play? You bei! Easy to win? Better start practicing. 

MOVING SIGNBOARD -by Cirde Enterprises 

This machine language program is designed to use the TRS-80 as a display 

tJcvice. The user may type -in ijp to a full screen of text, store it in memory 

imd then cause it to cruw] across the screen in the fashion of an electronic 

marquee. 

TRS-80 SLOT MACHINE by Circle Enterprises 

This program simulates iwith full graphics) a lypical 3-reel casino slot 
machine with \Q payoff combinations ranging from $2 to $200. 

PETALS AROUND THE ROSE by Circle Enterprises 
This is a TRS-80 implementanon of the dice game puzzle described in the 
Sep /OCT 1^77 issue of Personal CompuUng Magazine. The game is both 
challenging and frustrating for moiit people. 
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SCJ-Fl SAMPLER -bv Tim QuinJju] 

Three science fiction games in one progranK Lunar Lander, Star Monster 

and Space Battle. Instructions are part of the pio^ram along with graphic 

displays. 

CONCENTRATION by Lance ^fickKls 

Back in the sixty's, one of the most popular TV game shows in modem 
history appeared on the air, entertaining millions for years, **Win campers 
or boxes of nails, win gifts, but take the chance on forfeiting them later m 
the game/' Most ot all, concentrate on where these items appear on thG 
plf^y board, [his program runs in 16K on either Levet I or 11 ROM, and 
assures hours of enjoyment— just like you used to! 

FILE HANDUNG -by Circle Enterprises 

A must for ftie hsindhng m BASIC. Wih fist names rn file, search/edit tiJe, 
record file on cassette. One use would be to tecord names and phone 
numbt;rs, either one callable by the other, level 11 16K 

X-WINGHGHTER by Rev. George Blank 

Looking for more realism in "TREK*' type programming? Put yourself in 
the cockpit of this X- wing fighter. Extei^sive use of the IN KEY function puts 
all of the ship s controls at your ringertips without hitting the ENTER key. 
Long range sensors warn you of approaching a.ircraft in advance of a visual 
sighting. Whc!7 they are close enough to be seen, they wilJ become larger as 
they get closer, (see advertisement elsewhere in maga^itie) Level II 1 6K 

THREE D TIC TAC TOE 

Everyorsc knows the game, but how about a 4x4x4 version. This j^rograni 
offers ihrco skill levels for computer ct^mpetition, and the author w^arns you 
to practice before you take on the computer's third skill leveL Vou can also 
play your easy-to-beat friend, of course. LEVEL! & 11 16K, 

SM.4IT BUSINESS BOOKKEEPING-by Roger Robitaille 
For scores of years. National Distributing Company has been selling the 
"Dome Bookkeeping Journal" through stationery and discount stores 
nationwide. Our Small Business Bookkeeping progrtim is designed to bo 
compatible with that bookkeeping journal. As is appropriate w^ith 

any business application, we assume no liability whatsoever in regards to 
the use of this program. The user is expected to assess it based upon its 
performance as observed. It s not that we don't believe in it, itVs just that 
the conceivable Vibility for its use (or misuse) is so staggering that you just 
plain use it at your own risk, or don't use it, 

BANKO-by Lance Micklus 

Banko h a game slmUar to Blackjack in prindpaJ; however, the gs.me is not 
conducted in a simple *' win /loss'* manner. The maximum point is eleven, 
and the winner wins according to the point difference between the two 
players. Thus, the game is rot over when one player * 'busts". It is for the 
other player lo maximize his gains by increasing his count toward 11, 
without going over. Suitable for Level 1 or II 4K. systems. 



TIMB BOMB by David Bohike 

Somewhere inside a towering skyscraper, a time bomb is ticking away. In 
this game, your mission is to locate the explosive device <no easy task in 
such a large, maze-like structure) and disarm it wkhin a given time. Level \ 
or II 16K 

BLACK JACK-by Milan Chepko 

Yes, I know you atl have one, but if you are willing to forsake the graphics, 

many more of the Las Vegas type options are available with this Levei I 

program. 

TAROTCAKDS by Frank Rowlett 

This is probably the best future gazing type program I have seen. Unlike 

many programs in the field, whose appeal wear out quickly, the 

combination of the graphics and the presenation leads to continuing 

use—try it, you*ll like it. 

BASIC STATISTICS - by Steve Reisser 

This powerful set of procedures is of use to students, instructors, behavioral 

and research scientist, statisticians — anyone using rand order, central 

tendency* Pearson product- movement correlation coefficient, chi-square, 

Fisher T test, sample aiialysis of variance, Z-scores and standard scores, 

with a random number generator built in to simulate data. 

CRiBBAGE by Roger Robitaille, Sr. 

Here it is — the October SofiSlde feature program on digital cassette. It*s 

a '*you vs. computer*' Cribbage, played by the standard rules. The 

computer shuffleSn deals, keeps score and wins ...unless you>e carefuH 

Suitable for 16K machines. 

END ZONE - by Roger Robitaille 

The October cover program on cassette, to take some of the strain off your 

fingers. It's 16K TRS-80 football, rigiit down to the 2'minute warning, 

played in four 1 5- minute quaners. A 2-player game. Level 1 or 11 16K 

STAR TREK ffl -by Lance Micklus 

Oneof the most advancedStar Trek games ever written. Object is to explore 
as much of the galaxy as possible, destroy the 20 Klingons and locate the 5 
class M planets. Thus, the exploration part of the Enterprise's mission has 
been added to the game, giving it a whole new dimension. Speaking of 
dimension, the galaxy is 3 dimensional, not flat like in other versions. 
Extensive use of graphics is made. During a Klingon battle, you will see the 
Enterprise fire its phasers, the phasers bit the Klingon and the Klingon 
explode. And before you go charging off, you must be careful of the large 
stars and black holes, as well as the pulsar. But there's more; the pulsar 
makes space noise in adjacent quadrants. The only way to find a Khngori in 
those quadrants is to explore them. And you never can tell in which one of 
them a Klingon might be hiding. Also, when you dock at a Star Base, you 
must control you speed. Otherwise, you'll have a collision but won't dock. 
At the end of the game, you return to Star Fleet Headquarters, where the 
data you've been gathering in your ship's computer will be evaluated and 
your performance rated. 16K Level 11 only. Takes about 2 hours to play a 
game, 

55 



INVENTORY 

MANAGEMENT 
SOFTWARE 

INVENTORY FP 

This LS a Front Panel approach to Inventory management. Available otily for 
Level U machines, it is for those who never want to type LIST. It handles up 
to 100 stock items with 
primary and backup vendor 
and allows tbu stock on 
order and date last ship- 
ment received information . 
The major diirlerenoe be- 
iwccti Xh\^ system and the 
[VLodular system is that all 
information including char- 
acter strings, is comained 
hi subseripis and thus 
recordable separately from 
the program* 

If your inventory exceeds 
100 stock items, it should 
be a simple matter to 
segregate stock tnto logical 
subdivisions with separate 

data files. Two programs are included on one t:assette Onitializaiion ^ 
Main f ena n ce ) , Abov^^ Juvejitory FP b> M, KeJJeber 
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(?) simi£R?RfliiiosrtP 
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INVENTORY SUPER PAC 

This inventory [program makes maximum use of available memory. It is 
especially useful in a real time 'amoum on hand* environment, and will 
yield only the count. If your purposes require such features as automatic 
reordering and on line supplier information, we suggest that you look at one 
oHhc other inventory managcmertt programn. A good exampJe of use would 
be a retail Lite business where the at)ility to quickly determine the stock 
level of a certain type tire and to change it a sales occur and shiprnents 
arrive, is a necessity 

VERSION 1 150O hems stored in quanlicies of up to 999 
VERSION U 22O0 items stored in quantities of up to 99 
VERSION HI 6000 items stored in quantities of up to 9 
VERSION IV 750 items stored in quantities of up to 99 and price iiifotniation 
of up to four digits 

NOTE: items are callable by code number. A separate log is required to 
keep track ot what the code calls represent. 
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INVENTORY [MODULAR] 

This inventory program runs on Level I or 11 TRS-80 Microcomputers. Its 
construction permits the user to create subroutines customized to his own 
purpose. One of the main features of this program allows for the inclusion of 
Alphabetic information and a Data Index Code in the form of data 
statements within the program. The result is performance and flexibility 
unmatched by out other Inventory Software. AH versions include; 

L Reports-user specifies up to three numeric and either or both alpha 
informations to be listed and can be vendor specific 

2. Cost/vaine Summary -searches all stock areas and reports Cost/ value 

Quantity, Total Value by line item and Grand Total 

3. Reorder Search-compares current stock level against specified 

reorder point and displays on screen all line items in need of 
reorder, along with tentative reorder information 

4. Endex-uses arbitrary file numbers reflecting the order in which the 

data codes are stored. Index will reveal the file names and file 
numbers in groups of 24 for use in other data calls* 

5. Detailed Kept -every stock file is callable by file number to reveal all 

memory information regarding that item 
ti. Read and Write File-stores and reenters data frpm day to day 
Data Change -updates Data Base 
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Runs on Level 1 and iL 
REQUIRES 16K (SPECIFY VERSION WHEN ORDERING) 

VERSION 1 240 stock items can be contained using the full 8 data areas 

and two pieces of Alpha information 
VERSION 11 290 stock items can be contained using 6 data areas and two 

pieces of Alpha information. 
VERSION 111 450 stock items. Simplified report with no reorder search, 

allows one piece of Alpha information (description) and three data 

areas < quantity on hand, cost price, sales history) 



SUMMARY 



INVENTORY SUPER PAC 


LEVEL! 


4K 


SIO 


INVENTORY MODULAR 


LEVEL l&n 


16K 


$20 


INVENTORY FP 


LEVELH 


i6K 


$25 



Order from; 



TjS 



TRI-60 lofluKiie Cxchcifioc 

17 Briar Cliff Dr. Milford, NH 03055 
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PILLBOX by Gene Perkins 

This program simulates an artjilery battk between two fixed im placements. 
A two-pLayer game* eaeh player controls the angle of fire and the muzzle 
velocity tif the shell. The game places a mountain between the warring 
batteries and lets the laws of physics take over, A really good game, easily 
fitting a 4K machine. 

80aOTO Z-80 C0IVVERS!ON by M. Kellher 

What can we say! For yoti machine language buffs, here is a program wbich 
permits you to enter 8080 codings and the program will return tKe Z-SO 
equivalent. It will also store these equivalents in the order in which they 
were entered, for later review, 

BIORHYTHM by James Penny 

There is a theory that everyone is subject to a group of life cycles whkh, 
together, effect our daily Jife- The rates of those cycles are mathematically 
fixed and lend themselves to computer analysis. This program unravels 
those interrelated formulas into a meaningful graphic presentation. Runs In 
4K Level L 

BIWGO CALLING PROGRAM -hy Tim Quinlan 

This is a great program for the family or small groups. It picks a number 
and displays it in screen size characters. It then displays a table of all the 
calls up to that time. When someone has a bingo, there's a number 
<:heck!ng routine at the end. 

OTHELLO in -by Tim Quinlan 

A strategy game played on an 8 x 8 board. The object of the game is to 
capture as many of the squares as possible. You can play against the 
computer, a friend or have the computer play against itself. Has an 
interesting graphics display. 

GALACTIC BLOCKADE RUNNNER -by Tirti Quinlan 
You are the captain of it fedcTaiii>n stars hip battle cruiser. Your mission is to 
run an enemy blockade and to dt^iiver vital supplies to federation forces 
under siege on Planet M/5. You control youi ship's course and speed along 
with the firing of its weapons. You will have to fight battle after battle 
successfully to reach your destination. Besides the enemy, you will have to 
cope with ship malfunctions and ion storms. 

GAME;S/ GROUP I -by Tun Quinlan 

There are four games in this package, starting off with an old favorite (for 
compiiterij^ts, that is) Hammurabi. The other games are Concentration 1, 
which is based on the TV game, Russian Koulette, pky with the computer 
or a friend, and UFO. a space war game. 

REMAINDER by lance Micklus 

ArcalgoodwaytoshowoftyourTRS-SO. it's a 'Tmd my number^' game for 
people with 64K of head space, Waming! Don't leave this game loaded in 
your computer and walk away. Or, when you return, you'll fmd a crowd 
pEayJngthesgame. (Worse yet, they w^on't let you haveyour machine back,) 
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TREASURE HUNT by Lance Micklus 

This is a chaltenge^ so don't cheat and read the program listing. Use your 
imagination. You are exploring caves and trying to find 20 treasures. Some 
are easy to get, others are very difficult because you have to figure out how. 
When you first play, you will probably make a lot of mistakes* The more you 
play this game, the more secrets you will discover^ and thus, the more 
treasure you will find. All 20 treasures can be found in about an hour of play 
if you know what you 're doing. Your first problem is to draw a map of the 
caves. However, to save you time, a map is enclosed* Good luck, you*re 
gonna need it. 

CHECKERS by Don McAllister 

A Level I machine with 4K of memory is all you need to have a checkers 
partner on call whenever you're in the mood* The program is written in 
BASIC, but is suprisingly fast and competitive for such a small program, 

TEST FOR INDEPENDENT VARIABLES -by Steven Hebbler 

Computes for Mean, Standard Deviattont N, Degrees of Freedom, and 

probability of occurrence. Level U 4K 

METRIC/ENGLISH CONVERTER by Steven Hebbler 

Conversion of length, weighty volume* temperature, and area arc all 

provided for in this Level lor 11 4K program. 

HANGMAN, 2-PLAYER OR SOLITARY by Robert Harkins 

The game of Hangman just the way you remember playing it. Excellent 
graphics. Level 11 4K 

PORK BARREL by Rev. George Blank 

'*The game that Congressmen never stop playing ,.. re-election". So begins 
this 16K Level II masterpiece by the author of the December SoftSide's 
cover program, Santa Para via en Flumaccio, Put yourself In the shoes of an 
aspiring Congressman, Given a breakdown of your constituency by 
percentages; white collar, retired, farm worker, unemployed, welfare, blue 
collar, elderly, and many more, how would you vote on various sensitive 
issues? In POKK BARREL, you get to put your vote where your mouth is. 
Don't worry, the voters in your district will let you know how they feel! 

TROLL'S GOLD -by Rev, George Blank 

A chase game for children of all ages. The troll is deep within the caves. 
Your goal is to descend to his gold-filled lair and escape with the booty 
without him catching you. Level U 16K 

MASTERMIND U-by Lance Micklus 

Lots of people have written digital MASTERMIND programs that create 
the code and give you the clues. This one will also let you make the code and 
give the clues. You can play either way or take turns with the computer. 10 
rounds make up a game, and at the end of each round, player averages are 
displayed. Because this is a machine language program, it takes the 
computer 3 seconds or less to come up with a guess. Both Levels 1 and H 
versions are supplied. Level lloads with the CLO AD command, and Level n 
with the SYSTEM command (file name MSTR), Loads into memory 
addresses 5000 to 7FF0 and thus requires 16K of memory, 

59 



PROGRAM 


PRICE 


LEVEL 


MEMOKY 


SiarTt^ekl]] 


14.05 


11 


16K 


K-Wing Fighrer 


7.95 


11 


t6K 


("i>nit:ntratiaii 


7.^5 


I&ll 


IbK 


3-0 He lac foe 


7.% 


i^ii 


IbK 


Santa Parasiu en Fiumat:c*JM 


7,^5 


[\ 


Jf>K 


BaJiko 


4.^5 


16lII 


4K 


Pill box 


A.^S 


iikii 


4K 


OlhdloIII 


5M 


locll 


4K 


Oabciic Blockade Runner 


:.% 


](kll 


4 vV J 'iK 


t'lam^^; Gn:up 1 


5>J5 


l^II 


4K 


Ri^u-iitmdcr 


4.9^ 


M/1 


4K 


lirtie B^niib 


:>^:^ 


[^n 


IbK 


Black Jaik 


4.'>^ 


i&ii 


4K 


Cribbage 


7,^5 


1 ^ [] 


16K 


End Zone 


4/>5 


IiS;Il 


16K 


1 n.*iisure Hum 


7.45 


1 k 11 


16K 


Hangmar^ 


4.% 


l&IJ 


4K 


Pork Barrel! 


9.95 


11 


luK 


Troll's Gold 


.1,95 


11 


1^K 


Mastermind H 


7. 95 


(1 


16K 


Robot 


4»5 


LI 


4K 


Breakaway 


4,95 


r&n 


4K 


Bowsing 


7.95 


LI 


16K 


Checkers 


4,95 


1 


4K 


Sci-Fi Siini(ilcr 


535 


l&ll 


4K 


Pciais AroiiTid the Rose 


5.95 


fiirlJ 


4K 


TRS 8[) SLoi Machine 


5,95 


LiJ^LU 


AK 


Spulling Bee 


5.95 


LI 


4K 


Cash Register 


10.00 


I&IL 


4K 


Small Business Bookkeeping 


iS.Ofl 






With Jtmnui) 


22.00 


I^ll 


4K 


Inventory Mgt — Super Pac 


10.00 


I 


4K 


Inventory Mgt— Modular 


20.00 


\Si\\ 


I6K 


inventory Mgt — FP 


25,00 


11 


IfiK 


File Handling 


9.95 


LI 


16K 


Moving Si ;^ 11 board 


9.95 


\\ 


4K 


Micro Text l^di tor 


9.95 


11 


4K 


Accounts Receivable 


25.00 


11 


16K 


i*080-Z80 Ginvcrsion 


15.00 


IL 


\hK 


Basic Statisitks 


20,00 


11 


]hK 


Renumber 


15,00 


11 


4-48K 


Mc^triLvT^nglish Conv^tsion 


-MS 


l<fell 


IfiK 


Tl^sI lor Independent Variables 


5,95 


l^li 


4K 


Bingo Call ini? 


9.95 


l&ll 


4K 


Biorhythms 


.1.95 


IkU 


4K 


Tarot 


9.9S 


l&ll 


\bK 


Personal Finance 


9.95 


lu^'il 


4K 


Home Financial Mgl 


9.95 


11 


im 


Mortgage Calculation 


3,95 


11 


4K 
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HANGMAN [Uvel I]-by Koger Robitaille 

The age old pencil game has been tamed in Level I. Far those who don*t 
know the game, it is the original * 'guess my word in X number of tries" 
game. Originally in two versions^ improvements have permitted this 
Program to play both a solitary and a two-player version. To be acceptable 
to Level 1 BASIC, the words must be coded in numeric equivalents, but the 
ever available conversion chart lessens the confusion. The displays are 
alphabetic, 

PERSONAL FINANCE PACKAGE -by Tim Quinlan 

This package contains 3 programs to aid you in handling your personal 
finances. The fnst is a Che<]king Account Prograrn to help you keep track of 
checks, deposits, interest, charges, transfers, etc, along with computing 
your balance. It has a lot of nice features, including a fast method of data 
retrieval. The second program he^ps you keep track of your Budget and the 
final program computes Interest on loans, rnortgages and charge accounts. 



HAM RA0IO CLOCK -by Peter Ashley 

A versatile lime" keeping program which will track local. Greenwich Mean, 
elapsed time and flash prompts for station identification at proper intervals. 
Level I or Level IT 



Tc£ TRS-80 Sofluiore EHChcinfic 

# 17 8RIAR CLIFF DRIVE MILFORD, NEW HAMPSHIRE 03055 





SOFT WARE ORDER FORM 

DESCRIPTION LEVEL COST ' 










































TOTAL 




*Spec!al prices for feature programs 






in effect 60 days from date'of mailing 
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SANTA PARA VIA & FlUMACCIO by Rev. George Blank 
An economic capsule simulation of life in a 15ih century Italian city-state. 
Object of the game Is to build your fuedal holdings into a kingdoin, 
progressing to higher titles of nobility and ultimately coronation before 
death. Four leveh of difficulty: Apprentice, Journeyman, Master and 
Grand Master. For Level U 

MORTGAGE CALCtJLATION by Russell Starkey 

This program features an amortized loan schedule, displaying a complete 
list of payments showing the interest and principal portions of each 
payment* plus accumulated interest and principal at each payment and 
remaining baJance, For Level !l 4K or 16K. 



SPELLING BEE by Lance Micklus 

Displays a correctly spelled word, then asks player to type it out on the 
keyboard. Words are chosed at random ahd the order is not duplicated from 
session to session. May be updated by changing words in DATA statements 
as student's abiJIity increases. 



TcC 'TR^OO Softwore CKchonoe 

# 17 DRIAR CLIFF DFttVE MILFORD, NBv HAMPSHIRE DSO&S 

Send me the software listed on the reverse side of this 
order form. Full payment is enclosed as indicated: 

□ Check □ Money Order Charge your Software by telephone! 

Call 9am to 5pm — Mondav through 
DVISA/Master Charge Friday ^£60^-673-5144. 

Credit Card 
Account Number 



Exp. Date 

Signature 

NAME 

ADDRESS 

CITY, STATE 

62 



lnter.#(M/Conly) 



ZIP, 



12^78 



f^^' 



■i 






1 AX A rv If you find that 

CjGX 3 1 tlArj you have less time 



of this ! 



at the keyboard than you 

would like to, and have 

been nrjjsslng out on some 

of SoftSlde's feature programs, 

vye've got a solution I Your BASIC software magazine is 

pleased to announce : 



Cassette SoftSide 

That's right, beginning with the January issue, all of our 
monthly programs will be available on digitally certified audio 
cassettes, for only about a dollar apiece — satisfaction 
guaranteed. 

The price for six months of cassettes plus six months of SoftSide 
^1^ magazine is $38. (If you're already a subscriber to the 

i^: magazine, you can enroll for the cassettes only at a cost of $30. 

r-* for six months). So, if you would like to combine the best of 

programming available for the TRS-80 with the convenience of 
prerecorded cassettes, send your check or money order to 
I SoftSide today and leave the loading to us f 



ALL RIGHT \ Enroll me for 6 months of Cassette SoftSide. My 
full payment Is enclosed as indicated: 

n New Subscriber — $38.00 Q Subscriber — $30.00 

D Check □ Money Order □ Master Ctiarge/VISA 



Account # 



Expiration date lnterbank# 

Signature 

NAME 



ADDRESS^ 



CITY. STATE ZIP. 



Please send to SoftSide Box 68 Milford NH 03055 
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IN THE NEXT ISSUE . 




AppNcatJoniDmail 
at SECOND CLASS 
POSTAGE RATES 

Pending at 
Milford.NH 03055 



